From: Juanma Barranquero Date: Wed, 13 Jan 2010 16:28:32 +0000 (+0100) Subject: Fix comment for bug#5345. X-Git-Tag: emacs-pretest-23.1.92~43^2~2 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6c49ab95d722e73eee0127691e032f3d39a76602;p=emacs.git Fix comment for bug#5345. --- diff --git a/lisp/vc-bzr.el b/lisp/vc-bzr.el index 49bf677958b..d04c783ca32 100644 --- a/lisp/vc-bzr.el +++ b/lisp/vc-bzr.el @@ -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