]> code.delx.au - gnu-emacs-elpa/commitdiff
Squashed 'packages/gnorb/' changes from a387d85..538b5bd
authorEric Abrahamsen <eric@ericabrahamsen.net>
Tue, 5 May 2015 08:43:26 +0000 (16:43 +0800)
committerEric Abrahamsen <eric@ericabrahamsen.net>
Tue, 5 May 2015 08:43:26 +0000 (16:43 +0800)
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
gnorb-org.el
gnorb.el

index a77a7ed5319661e0e0725ec099ddfb30322e8085..e425ca2ffd9f56f5a88afd87f780abf7f5964956 100644 (file)
@@ -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)
index d54e9bae2e67bc882084dcaa930ffc1e1cdb69fc..99e52475a7468ad90689d4c4919fd3cfd855bade 100644 (file)
@@ -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))
index 35db4f64c4f236f447dc9cc3aea3c66bb5aa4734..63124d934eeea4a46d457c0b4a3ff7f137560605 100644 (file)
--- 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 <eric@ericabrahamsen.net>