From: Andreas Gerler <baron@bundesbrandschatzamt.de>
Date: Tue, 6 Dec 2016 10:12:37 +0000 (+0100)
Subject: fix for bba-export-jira-org
X-Git-Url: http://git.bundesbrandschatzamt.de/?a=commitdiff_plain;h=c54f87cd6b99fe12c9497c5d273194325d0458c7;p=emacsconfig.git

fix for bba-export-jira-org

- without region write-region saves the whole buffer even if it's narrowed.

Signed-off-by: Andreas Gerler <baron@bundesbrandschatzamt.de>
---

diff --git a/bba.org b/bba.org
index 73db2262..f26486c5 100644
--- a/bba.org
+++ b/bba.org
@@ -878,7 +878,9 @@ the jira ticket:
 	    (description (last (split-string (if (match-end 3)
 							    (match-string-no-properties 3)
 					       (match-string-no-properties 1)) ":"))))
-	(write-region nil nil (concat "/tmp/" (car description) ".org") nil nil )
+	(mark-whole-buffer)
+	(write-region (mark) (point) (concat "/tmp/" (car description) ".org") nil nil )
+    (deactivate-mark)
 	(if (string-equal system-type "darwin")(shell-command "open /tmp/"))
 	)))
   )