Make vc-dir default to repository root

* lisp/vc/vc-dir.el (vc-dir): Default to repository root, not
default-directory.
This commit is contained in:
Daniel Colascione 2015-01-19 21:44:30 -08:00
parent ef5a526f1b
commit f302475471
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2015-01-20 Daniel Colascione <dancol@dancol.org>
* vc/vc-dir.el (vc-dir): Default to repository root, not
default-directory.
2015-01-20 Dmitry Gutov <dgutov@yandex.ru>
* progmodes/etags.el (xref-etags-location): New class.

View file

@ -1241,7 +1241,7 @@ These are the commands available for use in the file status buffer:
;; Otherwise if you do C-x v d -> C-x C-f -> C-c v d
;; you may get a new *vc-dir* buffer, different from the original
(file-truename (read-directory-name "VC status for directory: "
default-directory default-directory t
(vc-root-dir) nil t
nil))
(if current-prefix-arg
(intern