stgit.el: Fix working directory bug in stgit-new

Signed-off-by: Gustav Hållberg <gustav@virtutech.com>
Acked-by: David Kågedal <davidk@lysator.liu.se>
Signed-off-by: Karl Hasselström <kha@treskal.com>

diff --git a/contrib/stgit.el b/contrib/stgit.el
index 220e159..fb632d2 100644 (file)
--- a/contrib/stgit.el
+++ b/contrib/stgit.el
@@ -386,8 +386,10 @@ With numeric prefix argument, pop that many patches."
 (defun stgit-new ()
   "Create a new patch"
   (interactive)
-  (let ((edit-buf (get-buffer-create "*StGit edit*")))
-    (log-edit 'stgit-confirm-new t nil edit-buf)))
+  (let ((edit-buf (get-buffer-create "*StGit edit*"))
+        (dir default-directory))
+    (log-edit 'stgit-confirm-new t nil edit-buf)
+    (setq default-directory dir)))
 
 (defun stgit-confirm-new ()
   (interactive)