[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/vc-bzr.el,v
From: |
Dan Nicolaescu |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/vc-bzr.el,v |
Date: |
Fri, 04 Jan 2008 08:34:18 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Dan Nicolaescu <dann> 08/01/04 08:34:16
Index: vc-bzr.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/vc-bzr.el,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- vc-bzr.el 29 Dec 2007 13:20:48 -0000 1.23
+++ vc-bzr.el 4 Jan 2008 08:34:14 -0000 1.24
@@ -118,9 +118,8 @@
"Return the root directory of the bzr repository containing FILE."
;; Cache technique copied from vc-arch.el.
(or (vc-file-getprop file 'bzr-root)
- (vc-file-setprop
- file 'bzr-root
- (vc-find-root file vc-bzr-admin-checkout-format-file))))
+ (let ((root (vc-find-root file vc-bzr-admin-checkout-format-file)))
+ (when root (vc-file-setprop file 'bzr-root root)))))
(defun vc-bzr-registered (file)
"Return non-nil if FILE is registered with bzr.
- [Emacs-diffs] Changes to emacs/lisp/vc-bzr.el,v,
Dan Nicolaescu <=