ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-gnus.el (org-gnus-follow-link): Minor code cleanup 

* org-gnus.el (org-gnus-follow-link): Minor code cleanup.
This commit is contained in:
Bastien Guerry 2014-05-15 11:41:31 +02:00
parent 736bc7b904
commit 4039d6c5b4
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org-gnus.el
View File

@ -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