Browse Source

getfollowing method takes required parameter user

master
Marcel van der Boom 9 years ago
parent
commit
28ba8499f3
  1. 5
      twister-rpc.el
  2. 4
      twister.el

5
twister-rpc.el

@ -55,15 +55,14 @@ while PARAMS contain the rest of the parameters." @@ -55,15 +55,14 @@ while PARAMS contain the rest of the parameters."
(json-rpc-close twisterd)
result))
(defun twister-getfollowing (&optional user)
(defun twister-getfollowing (user)
"Get a vector of usernames which are followed by `twister-user'.
The USER parameter is only useful for the locally registered
users. In most cases this will be the same as the `twister-user'
so we use that if user is not specified."
(interactive)
(twister-rpc "getfollowing" (if user user twister-user)))
(twister-rpc "getfollowing" user))
(provide 'twister-rpc)
;;; twister-rpc.el ends here

4
twister.el

@ -133,8 +133,6 @@ This uses the standard `goto-address-mode'." @@ -133,8 +133,6 @@ This uses the standard `goto-address-mode'."
;; ✓ define specific key map for posting messages
)
(defun twister-get-last-post(user)
"Get the last post of a user"
(let (obj (json-new-object))
@ -205,7 +203,7 @@ to end the posting activity." @@ -205,7 +203,7 @@ to end the posting activity."
"Produce a list of entries to which completion can be matched.
For now, this is just the nicknames the user follows"
(mapcar (lambda (x) (concat "@" x)) (twister-getfollowing)))
(mapcar (lambda (x) (concat "@" x)) (twister-getfollowing twister-user)))
(defun twister-parse-completion-arguments ()
"Look for completable items between POINT and what is before it.

Loading…
Cancel
Save