Homogenize buffer names

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>

diff --git a/contrib/stgit.el b/contrib/stgit.el
index 4d0faca92f201a5739b66271e98ca59b767258a6..e8bbb2c02dd7158576d25a77c4b4a821ac6f0e8c 100644 (file)
--- a/contrib/stgit.el
+++ b/contrib/stgit.el
@@ -293,7 +293,7 @@ (defun stgit-edit ()
   (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 @@ (defun stgit-confirm-edit ()
 (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 @@ (defun stgit-create-patch-name (description)
 (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)