[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 2c1a240: gnorb: Fix link following, bump to 1.5.6
From: |
Eric Abrahamsen |
Subject: |
[elpa] master 2c1a240: gnorb: Fix link following, bump to 1.5.6 |
Date: |
Sat, 29 Sep 2018 15:31:56 -0400 (EDT) |
branch: master
commit 2c1a2407f59532482a9d6927561edea3f6523a05
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>
gnorb: Fix link following, bump to 1.5.6
* packages/gnorb/gnorb-utils.el (gnorb-open-gnus-link): Remove
leftover article number caching: you're explicitly not supposed to
do this with the registry (article numbers are subject to change)
and it was causing problems.
* packages/gnorb/gnorb.el: Bump and flush.
---
packages/gnorb/gnorb-utils.el | 10 +++-------
packages/gnorb/gnorb.el | 2 +-
2 files changed, 4 insertions(+), 8 deletions(-)
diff --git a/packages/gnorb/gnorb-utils.el b/packages/gnorb/gnorb-utils.el
index c38932b..3b6c7ab 100644
--- a/packages/gnorb/gnorb-utils.el
+++ b/packages/gnorb/gnorb-utils.el
@@ -156,7 +156,6 @@ and Gnus and BBDB maps."
(defun gnorb-follow-gnus-link (group id)
"Be a little clever about following gnus links.
-
The goal here is reuse frames and windows as much as possible, so
we're not opening multiple windows on the *Group* buffer, for
instance, and messing up people's layouts. There also seems to be
@@ -211,16 +210,13 @@ window."
;; called from elsewhere...
(let* ((id (gnorb-bracket-message-id id))
(arts (gnus-group-unread group))
- artno success)
- (or (setq artno (car (gnus-registry-get-id-key id 'artno)))
- (progn
- (setq artno (cdr (gnus-request-head id group)))
- (gnus-registry-set-id-key id 'artno (list artno))))
+ (artno (cdr (gnus-request-head id group)))
+ success)
(gnus-activate-group group)
(setq success (gnus-group-read-group arts t group))
(if success
(gnus-summary-goto-article artno nil t)
- (signal 'error "Group could not be opened."))))
+ (signal 'error (format "Group %s could not be opened." group)))))
;; I'd like to suggest this as a general addition to Emacs. *Very*
;; tired of abusing `completing-read' for this purpose.
diff --git a/packages/gnorb/gnorb.el b/packages/gnorb/gnorb.el
index f9c704f..a632a3a 100644
--- a/packages/gnorb/gnorb.el
+++ b/packages/gnorb/gnorb.el
@@ -2,7 +2,7 @@
;; Copyright (C) 2018 Free Software Foundation, Inc.
-;; Version: 1.5.5
+;; Version: 1.5.6
;; Package-Requires: ((cl-lib "0.5"))
;; Maintainer: Eric Abrahamsen <address@hidden>
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master 2c1a240: gnorb: Fix link following, bump to 1.5.6,
Eric Abrahamsen <=