summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2014-05-15 11:41:31 +0200
committerBastien Guerry <bzg@altern.org>2014-05-15 11:41:31 +0200
commit4039d6c5b46979f4ba49d7ef11e7a03a93639af7 (patch)
treedaf219f029b9df8e6e1a5a1ecf55fc29c278bd36
parent736bc7b9047600a690a4c00c2a6510fff5044e1f (diff)
downloadorg-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.el6
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