# [PATCH 2/5] git.el: Set default directory before running the status mode setup hooks.

1 messages from 2006-03-04 to 2006-03-04. Participants: Alexandre Julliard.
Thread: https://gitlist.dev/t/3552

## Alexandre Julliard, 2006-03-04 16:38

Subject: [PATCH 2/5] git.el: Set default directory before running the status mode setup hooks.
Message-ID: <87fylykvwy.fsf@wine.dyndns.org>
URL: https://gitlist.dev/e/87fylykvwy.fsf%40wine.dyndns.org

```
Also set the list-buffers-directory variable for nicer buffer list
display.

Signed-off-by: Alexandre Julliard <julliard@winehq.org>

---

 contrib/emacs/git.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

437d990348e13e6a4460cc445ec5d2b2077cf2fb
diff --git a/contrib/emacs/git.el b/contrib/emacs/git.el
index 5828d4c..2363e48 100644
--- a/contrib/emacs/git.el
+++ b/contrib/emacs/git.el
@@ -943,6 +943,7 @@ Commands:
     (erase-buffer)
   (let ((status (ewoc-create 'git-fileinfo-prettyprint "" "")))
     (set (make-local-variable 'git-status) status))
+  (set (make-local-variable 'list-buffers-directory) default-directory)
   (run-hooks 'git-status-mode-hook)))
 
 (defun git-status (dir)
@@ -952,8 +953,8 @@ Commands:
   (if (file-directory-p (concat (file-name-as-directory dir) ".git"))
       (let ((buffer (create-file-buffer (expand-file-name "*git-status*" dir))))
         (switch-to-buffer buffer)
-        (git-status-mode)
         (cd dir)
+        (git-status-mode)
         (git-refresh-status)
         (goto-char (point-min)))
     (message "%s is not a git working tree." dir)))
-- 
1.2.4.g0040-dirty


-- 
Alexandre Julliard
julliard@winehq.org

```
