diff options
| author | Carlos Pita <carlosjosepita@gmail.com> | 2016-02-04 17:03:34 +1100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2016-02-04 17:03:34 +1100 |
| commit | 66c462005cc873d8e9dee684d525daa036d4f757 (patch) | |
| tree | e1f2d238a3e3a12f6fd788f0d628dc16c757f3e5 /lisp/erc | |
| parent | 8c562b2d7f6378b71e0dcbc172a4dd6673895256 (diff) | |
| download | emacs-66c462005cc873d8e9dee684d525daa036d4f757.tar.gz emacs-66c462005cc873d8e9dee684d525daa036d4f757.tar.bz2 emacs-66c462005cc873d8e9dee684d525daa036d4f757.zip | |
Make complection in erc use consistent casing
* lisp/erc/erc-pcomplete.el (pcomplete-erc-all-nicks): Make
case in the complection consistent (bug#18509).
Copyright-paperwork-exempt: Yes
Diffstat (limited to 'lisp/erc')
| -rw-r--r-- | lisp/erc/erc-pcomplete.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/erc/erc-pcomplete.el b/lisp/erc/erc-pcomplete.el index cf3f51ba3f6..9f572396de8 100644 --- a/lisp/erc/erc-pcomplete.el +++ b/lisp/erc/erc-pcomplete.el @@ -238,10 +238,12 @@ If optional argument IGNORE-SELF is non-nil, don't return the current nick." "Returns a list of all nicks on the current server." (let (nicks) (erc-with-server-buffer - (maphash (lambda (nick _user) - (setq nicks (cons (concat nick postfix) nicks))) + (maphash (lambda (_nick user) + (setq nicks (cons + (concat (erc-server-user-nickname user) postfix) + nicks))) erc-server-users)) - nicks)) + nicks)) (defun pcomplete-erc-channels () "Returns a list of channels associated with the current server." |