Lines Matching +defs:function +defs:list
70 "ERC version. This is used by function `erc-version'.")
79 "http://emacswiki.org/cgi-bin/wiki/ERC (mailing list: erc-discuss@gnu.org)"
136 (message (concat "ERC: The function `defvaralias' is not bound. See the "
146 See function `erc-compute-server' for more details on connection
164 This can be either a string, or a list of strings.
165 In the latter case, if the first nick in the list is already in use,
166 other nicks are tried in the list order.
168 See function `erc-compute-nick' for more details on connection
191 This can be either a string or a function to call.
193 See function `erc-compute-full-name' for more details on connection
198 (function :tag "Get from function"))
212 :type '(choice (const nil) string function))
259 (defcustom erc-hide-list nil
279 Each function in turn is called until one returns non-nil to
321 Each function should accept two arguments, NEW-NICK and OLD-NICK."
366 (put 'erc-with-server-buffer 'lisp-indent-function 0)
399 "This function is for internal use only.
406 "This function is for internal use only.
417 "This function is for internal use only.
436 "This function is for internal use only.
439 list for this channel. If this user is not in the
440 `erc-channel-users' list of any other buffers, the user is also
441 removed from the server's `erc-server-users' list.
455 "This function is for internal use only.
458 list as well as from all `erc-channel-users' lists.
473 "This function is for internal use only.
501 (defun erc-get-channel-user-list ()
502 "Returns a list of users in the current channel. Each element
503 of the list is of the form (USER . CHANNEL-DATA), where USER is
515 (defun erc-get-server-nickname-list ()
516 "Returns a list of known nicknames on the current server."
527 (defun erc-get-channel-nickname-list ()
528 "Returns a list of known nicknames on the current channel."
561 (defun erc-sort-channel-users-by-activity (list)
565 See also: `erc-get-channel-user-list'."
566 (sort list
578 (defun erc-sort-channel-users-alphabetically (list)
582 See also: `erc-get-channel-user-list'."
583 (sort list
602 \(not sure the ban list will be here, but why not)")
622 :type '(choice string function))
643 :type '(choice (const nil) string function))
678 "*Specifies a list of functions to call to echo a private
679 notice. Each function is called with four arguments, the string
682 function evaluates to non-nil. These hooks are called after
709 "*Specifies a list of functions to call to echo a private
710 notice. Each function is called with four arguments, the string
800 (defcustom erc-ignore-list nil
808 (make-variable-buffer-local 'erc-ignore-list)
810 (defcustom erc-ignore-reply-list nil
813 This differs from `erc-ignore-list' in that it also ignores any
838 (defcustom erc-startup-file-list
853 directory in the list."
891 will be used. RESULT may be either a string, or a function. If
892 a function, it should return the quit message as a string.
906 :type '(repeat (list regexp (choice (string) (function)))))
915 will be used. RESULT may be either a string, or a function. If
916 a function, it should return the part message as a string.
930 :type '(repeat (list regexp (choice (string) (function)))))
933 "*A function which returns the reason for quitting.
935 The function is passed a single argument, the string typed by the
944 "A function which returns the reason for parting a channel.
946 The function is passed a single argument, the string typed by the
1046 Note that no function in this hook can change the appearance of the
1059 This function is called with narrowing, ala `erc-send-modify-hook'."
1066 (list (byte-compile
1212 ENABLE-BODY is a list of expressions used to enable the mode.
1213 DISABLE-BODY is a list of expressions used to disable the mode.
1250 (add-to-list 'erc-modules (quote ,name))
1268 ;; For find-function and find-variable.
1280 This function temporarily adds a function to EVENT's hook to
1281 execute FORMS. After FORMS are run, the function is removed from
1287 Please be sure to use this function in server-buffers. In
1308 This function temporarily prepends a function to EVENT's hook to
1309 execute FORMS. After FORMS are run, the function is removed from
1576 (defun erc-member-ignore-case (string list)
1583 (while list
1584 (if (string= string (erc-downcase (car list)))
1585 (throw 'result list)
1586 (setq list (cdr list))))))
1620 (put 'erc-with-buffer 'lisp-indent-function 1)
1637 "Return a list of `erc-mode' buffers matching certain criteria.
1638 PREDICATE is a function executed with each buffer, if it returns t, that buffer
1654 (buffer-list)))))
1656 (defun erc-buffer-list (&optional predicate proc)
1657 "Return a list of ERC buffers.
1658 PREDICATE is a function which executes with every buffer satisfying
1659 the predicate. If PREDICATE is passed as nil, return a list of all ERC
1679 (erc-buffer-list ,pre
1681 (put 'erc-with-all-buffers-of-server 'lisp-indent-function 1)
1689 `erc-modified-channels-alist' in front of the buffer list.
1691 Due to some yet unresolved reason, global function `iswitchb-mode'
1692 needs to be active for this function to work."
1703 (erc-buffer-list
1715 (defun erc-channel-list (proc)
1716 "Return a list of channel buffers.
1725 (defun erc-buffer-list-with-nick (nick proc)
1726 "Return buffers containing NICK in the `erc-channel-users' list."
1762 (defvar erc-channel-list nil
1763 "Server channel list.")
1764 (make-variable-buffer-local 'erc-channel-list)
1775 "The local copy of `erc-nick' - the list of nicks to choose from.")
1794 "A list of modules which ERC should enable.
1797 removed from the list will be disabled."
1905 connect passwd tgt-list channel process)
1949 (setq erc-default-recipients tgt-list)
1971 ;; Server channel list
1972 (setq erc-channel-list ())
1977 ;; The local copy of `erc-nick' - the list of nicks to choose
1978 (setq erc-default-nicks (if (consp erc-nick) erc-nick (list erc-nick)))
2024 (defvar erc-server-history-list nil
2025 "IRC server interactive selection history list.")
2027 (defvar erc-nick-history-list nil
2028 "Nickname interactive selection history list.")
2035 (erc-buffer-list
2068 (erc-compute-server) nil nil 'erc-server-history-list))
2086 nil nil 'erc-nick-history-list)
2089 nil nil 'erc-nick-history-list))))
2111 nil nil 'erc-nick-history-list)))
2112 (list :server server :port port :nick nick :password passwd)))
2121 This function is the main entry point for ERC.
2149 (let ((erc-server-connect-function 'erc-open-ssl-stream))
2180 function `erc-toggle-debug-irc-protocol' to toggle its value.")
2274 Auxiliary function used in `erc-display-line'. The line gets filtered to
2278 If STRING is nil, the function does nothing."
2285 (buffer-undo-list t)
2313 (erc-update-undo-list (- (or (marker-position erc-insert-marker)
2317 (defun erc-update-undo-list (shift)
2318 ;; Translate buffer positions in buffer-undo-list by SHIFT.
2319 (unless (or (zerop shift) (atom buffer-undo-list))
2320 (let ((list buffer-undo-list) elt)
2321 (while list
2322 (setq elt (car list))
2324 (incf (car list) shift))
2342 (setq list (cdr list))))))
2353 All screen output must be done through this function. If BUFFER is nil
2355 The BUFFER can be an actual buffer, a list of buffers, 'all or 'active.
2361 If STRING is nil, the function does nothing."
2365 ((bufferp buffer) (list buffer))
2367 ((processp buffer) (list (process-buffer buffer)))
2370 (erc-buffer-list nil erc-server-process))
2372 (list (erc-active-buffer)))
2374 (list (process-buffer erc-server-process)))
2375 (t (list (current-buffer)))))
2378 (add-to-list 'new-bufs buf)))
2423 (unless (member (erc-response.command parsed) erc-hide-list)
2428 (defun erc-message-type-member (position list)
2431 This function relies on the erc-parsed text-property being
2434 (and prop-val (member (erc-response.command prop-val) list))))
2436 (defvar erc-send-input-line-function 'erc-send-input-line)
2437 (make-variable-buffer-local 'erc-send-input-line-function)
2453 "Return the argument list of a function without the parens."
2454 (let ((arglist (format "%S" (erc-function-arglist fun))))
2460 "For CMD being the function name of a ERC command, something like
2472 If the command in the LINE is not bound as a function `erc-cmd-<COMMAND>',
2478 this function from interpreting the line as a command."
2479 (let ((command-list (erc-extract-command-from-line line)))
2480 (if (and command-list
2482 (let* ((cmd (nth 0 command-list))
2483 (args (nth 1 command-list)))
2498 (funcall erc-send-input-line-function r line force)
2573 this function. LINE is sent to the server verbatim, and
2581 If no USER argument is specified, list the contents of `erc-ignore-list'."
2591 (erc-with-server-buffer (add-to-list 'erc-ignore-list user)))
2592 (if (null (erc-with-server-buffer erc-ignore-list))
2593 (erc-display-line (erc-make-notice "Ignore list is empty") 'active)
2594 (erc-display-line (erc-make-notice "Ignore list:") 'active)
2598 (erc-with-server-buffer erc-ignore-list))))
2602 "Remove the user specified in USER from the ignore list."
2605 erc-ignore-list)))))
2619 (setq erc-ignore-list (delete ignored-nick erc-ignore-list)))))
2696 If FUNC contains a valid function or variable, help about that
2708 For a list of user commands (/join /part, ...):
2727 ((fboundp sym) (describe-function sym))
2755 (erc-channel-list erc-server-process))))
2769 "If non-nil, a names list is currently being received.
2778 This function clears the channel name list first, then sends the
2873 (add-to-list 'symlist
2879 (add-to-list 'symlist
2885 (add-to-list 'symlist
2891 (add-to-list 'symlist
2897 (add-to-list 'symlist
2903 (add-to-list 'symlist
2909 (add-to-list 'symlist
2995 A list of valid mode strings for Freenode may be found at
3097 (list (read-from-minibuffer "Start a query with: " nil)))
3365 "A list of bans seen for the current channel.
3371 or not the ban list has been requested from the server.")
3378 The ban list is fetched from the server if necessary."
3391 ;; fetch the ban list then callback
3420 (erc-make-notice (format "Ban list for channel: %s\n"
3439 (erc-display-line (erc-make-notice "End of Ban list")
3461 ;; fetch the ban list then callback
3482 (erc-group-list bans 3))))
3522 If PROMPT is nil, one is constructed with the function `erc-prompt'.
3564 (setq buffer-undo-list nil)
3578 (defvar erc-action-history-list ()
3579 "History list for interactive action input.")
3586 "Action: " nil nil nil 'erc-action-history-list)))
3595 (list
3599 erc-channel-list)))
3608 (list
3618 (list
3624 (let ((topic-list (split-string topic "\C-o"))) ; strip off the topic setter
3625 (erc-cmd-TOPIC (concat (erc-default-target) " " (car topic-list)))))
3630 (interactive (list (read-from-minibuffer
3641 (interactive (list (read-from-minibuffer
3652 (interactive (list (read-from-minibuffer
3683 This function uses `erc-complete-functions'."
3716 (setq res (append res (list x)))))
3731 (nconc erc-server-vectors (list parsed))
3748 (list target)
3871 ;; FIXME: This needs more documentation, unless it's not a user function --
3916 (defcustom erc-format-nick-function 'erc-format-nick
3919 :type 'function)
3923 See also `erc-format-nick-function'."
3930 See also `erc-format-nick-function'."
3952 the server buffer. This function is designed to be added to
3960 function is designed to be added to either `erc-echo-notice-hook'
3968 "Echos a private notice in the minibuffer. This function is
3975 "Echos a private notice in the server buffer. This function is
3983 buffer is not the server buffer. This function is designed to be
3992 "Echos a private notice in the active buffer. This function is
4000 is a member. This function is designed to be added to either
4006 `erc-buffer-list-with-nick'."
4007 (let ((buffers (erc-buffer-list-with-nick sender erc-server-process)))
4014 which SENDER is a member. This function is designed to be added
4021 `erc-buffer-list-with-nick'."
4022 (let ((buffers (erc-buffer-list-with-nick sender erc-server-process)))
4023 (add-to-list 'buffers buffer)
4030 is a member. This function is designed to be added to either
4036 `erc-buffer-list-with-nick'."
4037 (let ((buffers (erc-buffer-list-with-nick sender erc-server-process)))
4078 ;; Remove the unbanned masks from the ban list
4087 ;; Add the banned mask(s) to the ban list
4097 (defun erc-group-list (list n)
4099 (cond ((null list) nil)
4100 ((null (nthcdr n list)) (list list))
4101 (t (cons (erc-subseq list 0 n) (erc-group-list (nthcdr n list) n)))))
4158 parsed (list 'notice 'error) proc 'ctcp-too-many)
4161 parsed (list 'notice 'error) proc
4187 parsed (list 'notice 'error) proc
4392 "Internal function.
4394 Used when a channel names list is about to be received. Should
4401 "Internal function.
4403 Used to fix `erc-channel-users' after a channel names list has been
4415 "This function is for internal use only.
4555 :buffers (list (current-buffer))))
4590 "Remove NICK from current channel membership list.
4598 "Remove NICK from CHANNEL's membership list.
4623 ;; list of triples: (mode-char 'on/'off argument)
4649 (defun erc-sort-strings (list-of-strings)
4653 (sort (copy-sequence list-of-strings) 'string<))
4656 "Parse MODE-STRING into a list.
4658 Returns a list of three elements:
4664 arg-modes is a list of triples of the form:
4674 (arg-modes nil); list of triples: (mode-char 'on/'off argument)
4676 ;; make the argument list
4686 (setq arg-modes (cons (list (car chars)
4692 (setq arg-modes (cons (list (car chars)
4704 (list add-modes remove-modes arg-modes))
4714 ;; list of triples: (mode-char 'on/'off argument)
4778 a list containing the original nickname, login name and hostname for the user,
4779 and L is a list containing additional TYPE-specific arguments.
4827 You can redefine or `defadvice' this function in order to add
4831 (defun erc-list (thing)
4832 "Return THING if THING is a list, or a list with THING as its element."
4835 (list thing)))
4840 Return a list of the three separate tokens."
4843 (list (match-string 1 string)
4848 (list (match-string 1 string)
4852 (list string "" ""))))
4861 &optional object value-list)
4867 (unless value-list
4868 (setq value-list (mapcar (lambda (x)
4873 properties value-list))
4969 (list line))))
5023 list of the form: (command args) where both elements are strings."
5027 (canon-defun (while (and cmd (symbolp (symbol-function cmd)))
5028 (setq cmd (symbol-function cmd))))
5036 (list cmd-fun arg))))
5039 "Split STRING, containing multiple lines and return them in a list.
5095 "Add CHANNEL to the default channel list."
5104 "Delete CHANNEL from the default channel list."
5114 "Add QUERY'd NICKNAME to the default channel list.
5136 "Return non-nil if SPEC matches something in `erc-ignore-list'.
5139 matches against all the regexp's in `erc-ignore-list'. If any
5142 (dolist (ignored (erc-with-server-buffer erc-ignore-list))
5148 "Return non-nil if MSG matches something in `erc-ignore-reply-list'.
5151 user matches any regexp in `erc-ignore-reply-list'."
5158 (erc-list-match erc-ignore-reply-list
5186 (defun erc-list-match (lst str)
5238 (arg (erc-load-irc-script-lines (list (concat "/mode " tgt " -i"))
5240 (t (erc-load-irc-script-lines (list (concat "/mode " tgt " +i"))
5244 "Read a key sequence and call the corresponding channel mode function.
5296 (if tgt (erc-load-irc-script-lines (list (concat "/names " tgt)))
5311 specified in the list PATH.
5325 See also `erc-startup-file-list'."
5327 (dolist (f erc-startup-file-list)
5370 (arg-list nil)
5375 ;; First, compute the argument list
5378 (setq arg-list (cons (match-string 1 tmp) arg-list))
5380 (setq arg-list (nreverse arg-list))
5381 (setq arg-num (length arg-list))
5404 (if (<= n arg-num) (nth (1- n) arg-list) "")))
5429 "Load IRC script LINES (a list of strings).
5500 - SERVER (the argument passed to this function)
5515 - NICK (the argument passed to this function)
5518 - The result from the `user-login-name' function"
5531 - FULL-NAME (the argument passed to this function)
5534 - The result from the `user-full-name' function"
5547 - PORT (the argument passed to this function)
5556 Returns a list of the form (HIGH LOW), compatible with Emacs time format."
5558 (list (truncate (/ n 65536))
5751 If given a function, call it and use the resulting face name.
5756 (function :tag "Call a function")))
5874 (list (format-spec erc-mode-line-format spec)))
5875 (setq modeline-process (list process-status)))
5878 (list (format-spec erc-mode-line-format spec)))
5879 (setq mode-line-process (list process-status))))
5913 (dolist (buf (erc-buffer-list))
5985 (let ((bufs (erc-buffer-list nil erc-server-process)))
6005 (list (symbol-name e)))
6153 This function is an example on what could be done with formatting
6192 (error "Obscure usage of this function appeared"))
6202 (add-hook 'kill-buffer-hook 'erc-kill-buffer-function)
6221 (defun erc-kill-buffer-function ()
6223 This function should be on `kill-buffer-hook'.
6224 When the current buffer is in `erc-mode', this function will run
6241 This function should be on `erc-kill-server-hook'."
6248 This function should be on `erc-kill-channel-hook'."
6287 ;; To activate, customize `url-irc-function' to `url-irc-erc'.