diff options
| author | Tassilo Horn <tsdh@gnu.org> | 2015-07-17 13:18:38 +0200 |
|---|---|---|
| committer | Tassilo Horn <tsdh@gnu.org> | 2015-07-17 13:18:38 +0200 |
| commit | 5bd8e67c6e47f672847a9e85a527fe17a0345d01 (patch) | |
| tree | 55cb2e36cd00271ddad52e35d89fc8d9ebe6fd89 /lisp/net/rcirc.el | |
| parent | fa5a880f733cbbe3b0d515ed3e1cf7c6fd54cfd8 (diff) | |
| download | emacs-5bd8e67c6e47f672847a9e85a527fe17a0345d01.tar.gz | |
Support @-mentions
* rcirc.el (rcirc-completion-at-point): Support completion of
mentions/messages with @nick instead of just nick.
Diffstat (limited to 'lisp/net/rcirc.el')
| -rw-r--r-- | lisp/net/rcirc.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index 852d2941f0b..13a7cfa6112 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el @@ -904,7 +904,10 @@ The list is updated automatically by `defun-rcirc-command'.") "Function used for `completion-at-point-functions' in `rcirc-mode'." (and (rcirc-looking-at-input) (let* ((beg (save-excursion - (if (re-search-backward " " rcirc-prompt-end-marker t) + ;; On some networks it is common to message or + ;; mention someone using @nick instead of just + ;; nick. + (if (re-search-backward "[[:space:]@]" rcirc-prompt-end-marker t) (1+ (point)) rcirc-prompt-end-marker))) (table (if (and (= beg rcirc-prompt-end-marker) |