Need to set default directory before trying to print the log.

[git-p4: depot-paths = "//guest/Ben_Key/vc-p4/,//guest/jonathan_kamens/vc-p4/,//guest/magnus_henoch/vc-p4/": change = 1264]
This commit is contained in:
Jonathan Kamens 2002-01-09 17:29:01 -08:00
parent b3a90ce59f
commit 1e65e958c7

View file

@ -591,8 +591,9 @@ comment COMMENT."
(defun vc-p4-print-log (file) (defun vc-p4-print-log (file)
"Print Perforce log for FILE into *vc* buffer." "Print Perforce log for FILE into *vc* buffer."
(let ((inhibit-read-only t)) (set-buffer (get-buffer-create "*vc*"))
(set-buffer (get-buffer-create "*vc*")) (let ((inhibit-read-only t)
(default-directory (file-name-directory file)))
(erase-buffer) (erase-buffer)
(p4-lowlevel-filelog file (current-buffer) t t))) (p4-lowlevel-filelog file (current-buffer) t t)))