1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00

Fix comment for bug#5345.

This commit is contained in:
Juanma Barranquero 2010-01-13 17:28:32 +01:00
parent 768c0c0f39
commit 6c49ab95d7

View file

@ -363,8 +363,9 @@ If any error occurred in running `bzr status', then return nil."
(let ((l-c-parent-dir (match-string 1)))
(when (and (memq system-type '(ms-dos windows-nt))
(string-match-p "^/[[:alpha:]]:" l-c-parent-dir))
;;; On Windows, file:// URLs often have three slashes,
;;; so we must remove the remaining one (bug#5345)
;;; The non-Windows code takes a shortcut by using the host/path
;;; separator slash as the start of the absolute path. That
;;; does not work on Windows, so we must remove it (bug#5345)
(setq l-c-parent-dir (substring l-c-parent-dir 1)))
(setq branch-format-file
(expand-file-name vc-bzr-admin-branch-format-file