Mercurial > emacs
comparison lisp/erc/erc-pcomplete.el @ 76856:2fae574a2382
Release ERC 5.2.
I have updated the version of ERC to 5.2, since it fixes a bug with C-c
C-SPC being bound globally by default. For the full list of changes in
this version, see etc/ERC-NEWS.
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-687
Creator: Michael Olson <mwolson@gnu.org>
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sun, 01 Apr 2007 13:36:38 +0000 |
parents | 7a3f13e2dd57 |
children | 85d67fae9a94 |
comparison
equal
deleted
inserted
replaced
76855:e6686c0a3d45 | 76856:2fae574a2382 |
---|---|
178 | 178 |
179 (defun pcomplete/erc-mode/WHOIS () | 179 (defun pcomplete/erc-mode/WHOIS () |
180 (while (pcomplete-here (pcomplete-erc-nicks)))) | 180 (while (pcomplete-here (pcomplete-erc-nicks)))) |
181 | 181 |
182 (defun pcomplete/erc-mode/UNIGNORE () | 182 (defun pcomplete/erc-mode/UNIGNORE () |
183 (pcomplete-here (with-current-buffer (erc-server-buffer) erc-ignore-list))) | 183 (pcomplete-here (erc-with-server-buffer erc-ignore-list))) |
184 | 184 |
185 ;;; Functions that provide possible completions. | 185 ;;; Functions that provide possible completions. |
186 | 186 |
187 (defun pcomplete-erc-commands () | 187 (defun pcomplete-erc-commands () |
188 "Returns a list of strings of the defined user commands." | 188 "Returns a list of strings of the defined user commands." |
231 (nreverse nicks))) | 231 (nreverse nicks))) |
232 | 232 |
233 (defun pcomplete-erc-all-nicks (&optional postfix) | 233 (defun pcomplete-erc-all-nicks (&optional postfix) |
234 "Returns a list of all nicks on the current server." | 234 "Returns a list of all nicks on the current server." |
235 (let (nicks) | 235 (let (nicks) |
236 (with-current-buffer (process-buffer erc-server-process) | 236 (erc-with-server-buffer |
237 (maphash (lambda (nick user) | 237 (maphash (lambda (nick user) |
238 (setq nicks (cons (concat nick postfix) nicks))) | 238 (setq nicks (cons (concat nick postfix) nicks))) |
239 erc-server-users)) | 239 erc-server-users)) |
240 nicks)) | 240 nicks)) |
241 | 241 |