diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-08-30 20:46:01 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-08-30 20:46:01 -0400 |
| commit | e1991423c66ab95eb44721bec4415669780fee3b (patch) | |
| tree | 7557b838a7eab0a27674584db0b9537f980153fe /lisp/gnus | |
| parent | ba7ac1f6e5f675614953c51dafff677b7ddafa2b (diff) | |
| download | emacs-e1991423c66ab95eb44721bec4415669780fee3b.tar.gz | |
* lisp/gnus/gnus-notifications.el (gnus-notifications-action): Avoid CL-ism.
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/gnus-notifications.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index c449f53d420..b167686b09c 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2012-08-31 Stefan Monnier <monnier@iro.umontreal.ca> + + * gnus-notifications.el (gnus-notifications-action): Avoid CL-ism. + 2012-08-30 Julien Danjou <julien@danjou.info> * gnus-notifications.el (gnus-notifications-notify): Use timeout from diff --git a/lisp/gnus/gnus-notifications.el b/lisp/gnus/gnus-notifications.el index 811a90895ae..c5129958997 100644 --- a/lisp/gnus/gnus-notifications.el +++ b/lisp/gnus/gnus-notifications.el @@ -74,7 +74,7 @@ not get notifications." (let ((group-article (assoc id gnus-notifications-id-to-msg))) (when group-article (let ((group (cadr group-article)) - (article (caddr group-article))) + (article (nth 2 group-article))) (gnus-fetch-group group (list article))))))) (defun gnus-notifications-notify (from subject photo-file) |