[StGit PATCH] Homogenize buffer names

From: Karl Hasselström <kha@treskal.com>
Date: Jan 24, 2008, 07:55 UTC
Message-ID: <20080124075530.25461.20753.stgit@yoghurt>

It was driving me crazy that I couldn't tab-complete "*stg" to "*stgit*" because there was always a "*stgit edit*" buffer lying around.

Signed-off-by: Karl Hasselström <kha@treskal.com>

---

David, do you agree with this fix?

 contrib/stgit.el |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/contrib/stgit.el b/contrib/stgit.el
index 4d0faca..e8bbb2c 100644
--- a/contrib/stgit.el
+++ b/contrib/stgit.el
@@ -293,7 +293,7 @@ Commands:
   (let ((patch (if (stgit-applied-at-point)
                    (stgit-patch-at-point)
                  (error "This patch is not applied")))
-        (edit-buf (get-buffer-create "*stgit edit*"))
+        (edit-buf (get-buffer-create "*StGit edit*"))
         (dir default-directory))
     (log-edit 'stgit-confirm-edit t nil edit-buf)
     (set (make-local-variable 'stgit-edit-patch) patch)
@@ -313,7 +313,7 @@ Commands:
 (defun stgit-new ()
   "Create a new patch"
   (interactive)
-  (let ((edit-buf (get-buffer-create "*stgit edit*")))
+  (let ((edit-buf (get-buffer-create "*StGit edit*")))
     (log-edit 'stgit-confirm-new t nil edit-buf)))
 
 (defun stgit-confirm-new ()
@@ -352,7 +352,7 @@ Commands:
 (defun stgit-coalesce (patch-names)
   "Run stg coalesce on the named patches"
   (interactive (list (stgit-marked-patches)))
-  (let ((edit-buf (get-buffer-create "*stgit edit*"))
+  (let ((edit-buf (get-buffer-create "*StGit edit*"))
         (dir default-directory))
     (log-edit 'stgit-confirm-coalesce t nil edit-buf)
     (set (make-local-variable 'stgit-patches) patch-names)