diff options
author | Bastien Guerry <bzg@altern.org> | 2014-05-15 11:41:31 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2014-05-15 11:41:31 +0200 |
commit | 4039d6c5b46979f4ba49d7ef11e7a03a93639af7 (patch) | |
tree | daf219f029b9df8e6e1a5a1ecf55fc29c278bd36 | |
parent | 736bc7b9047600a690a4c00c2a6510fff5044e1f (diff) | |
download | org-mode-4039d6c5b46979f4ba49d7ef11e7a03a93639af7.tar.gz |
org-gnus.el (org-gnus-follow-link): Minor code cleanup
* org-gnus.el (org-gnus-follow-link): Minor code cleanup.
-rw-r--r-- | lisp/org-gnus.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/org-gnus.el b/lisp/org-gnus.el index 785b577..2c79347 100644 --- a/lisp/org-gnus.el +++ b/lisp/org-gnus.el @@ -249,10 +249,8 @@ If `org-store-link' was called with a prefix arg the meaning of (require 'gnus) (funcall (cdr (assq 'gnus org-link-frame-setup))) (if gnus-other-frame-object (select-frame gnus-other-frame-object)) - (when group - (setq group (org-no-properties group))) - (when article - (setq article (org-no-properties article))) + (setq group (org-no-properties group)) + (setq article (org-no-properties article)) (cond ((and group article) (gnus-activate-group group) (condition-case nil |