branch: master
commit faf966b6b5921074da6b99477e1f0bea29b45f6f
Author: Eric Abrahamsen <e...@ericabrahamsen.net>
Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
Squashed 'packages/gnorb/' changes from a387d85..538b5bd
538b5bd Bump version to 1.1.1
209b938 Attach outgoing message check to message-sent-hook
51439a1 Look in drawers for potential mail links
2783829 Save return config for quick reply
git-subtree-dir: packages/gnorb
git-subtree-split: 538b5bd743b430d914d3a3046ad6545418c238a1
---
gnorb-gnus.el | 7 +++----
gnorb-org.el | 2 +-
gnorb.el | 2 +-
3 files changed, 5 insertions(+), 6 deletions(-)
diff --git a/gnorb-gnus.el b/gnorb-gnus.el
index a77a7ed..e425ca2 100644
--- a/gnorb-gnus.el
+++ b/gnorb-gnus.el
@@ -309,10 +309,7 @@ information about the outgoing message into
'gnorb-org-restore-after-send t))
(setq gnorb-message-org-ids nil)))))
-;; This sets the global value, but the hook is made buffer-local in
-;; `gnus-inews-add-send-actions', so this is ignored
-;(add-hook 'message-header-hook 'gnorb-gnus-check-outgoing-headers)
-(add-hook 'message-send-hook 'gnorb-gnus-check-outgoing-headers t)
+(add-hook 'message-sent-hook 'gnorb-gnus-check-outgoing-headers t)
;;;###autoload
(defun gnorb-gnus-outgoing-do-todo (&optional arg)
@@ -628,6 +625,8 @@ reply."
(targ (car-safe related-headings)))
(if targ
(let ((ret (make-marker)))
+ (setq gnorb-window-conf (current-window-configuration))
+ (move-marker gnorb-return-marker (point))
;; Assume the first heading is the one we want.
(gnorb-registry-make-entry
msg-id from subject targ group)
diff --git a/gnorb-org.el b/gnorb-org.el
index d54e9ba..99e5247 100644
--- a/gnorb-org.el
+++ b/gnorb-org.el
@@ -164,7 +164,7 @@ we came from."
:raw-value
head)
strings)
- (org-element-map tree 'paragraph
+ (org-element-map tree '(paragraph drawer)
(lambda (p)
(push (org-element-interpret-data p)
strings))
diff --git a/gnorb.el b/gnorb.el
index 35db4f6..63124d9 100644
--- a/gnorb.el
+++ b/gnorb.el
@@ -2,7 +2,7 @@
;; Copyright (C) 2014 Free Software Foundation, Inc.
-;; Version: 1.1.0
+;; Version: 1.1.1
;; Package-Requires: ((cl-lib "0.5"))
;; Maintainer: Eric Abrahamsen <e...@ericabrahamsen.net>
