diff options
| -rw-r--r-- | lisp/erc/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/erc/erc-button.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index 5856a592ebf..f7a998c5e0e 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-11-25 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * erc-button.el (erc-nick-popup): Make `nick' available in the | ||
| 4 | eval environment. (Bug#15969) | ||
| 5 | |||
| 1 | 2013-11-04 Stefan Monnier <monnier@iro.umontreal.ca> | 6 | 2013-11-04 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 7 | ||
| 3 | * erc-pcomplete.el (erc-pcomplete): Set this-command. | 8 | * erc-pcomplete.el (erc-pcomplete): Set this-command. |
diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el index 751a35dfdff..a124954498d 100644 --- a/lisp/erc/erc-button.el +++ b/lisp/erc/erc-button.el | |||
| @@ -514,7 +514,7 @@ Examples: | |||
| 514 | (code (cdr (assoc action erc-nick-popup-alist)))) | 514 | (code (cdr (assoc action erc-nick-popup-alist)))) |
| 515 | (when code | 515 | (when code |
| 516 | (erc-set-active-buffer (current-buffer)) | 516 | (erc-set-active-buffer (current-buffer)) |
| 517 | (eval code)))) | 517 | (eval code `((nick . ,nick)))))) |
| 518 | 518 | ||
| 519 | ;;; Callback functions | 519 | ;;; Callback functions |
| 520 | (defun erc-button-describe-symbol (symbol-name) | 520 | (defun erc-button-describe-symbol (symbol-name) |