Mercurial > emacs

changeset 5732:d97df1629181

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
vc-parse-buffer: arrange for old properties to get cleared when their match string is not found in the master file.
author Eric S. Raymond <esr@snark.thyrsus.com>
date Wed, 02 Feb 1994 03:27:26 +0000
parents d53870d31221
children 04260338bfca
files lisp/vc.el
diffstat 1 files changed, 7 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Wed Feb 02 00:06:43 1994 +0000
+++ b/lisp/vc.el	Wed Feb 02 03:27:26 1994 +0000
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1992, 1993 Free Software Foundation, Inc.
 
 ;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
-;; Version: 5.4
+;; Version: 5.5
 
 ;; This file is part of GNU Emacs.
 
@@ -1292,11 +1292,12 @@
 				   (vc-match-substring 1))))))
 		   latest-val))
 	     (prog1
-		 (and (re-search-forward p nil t)
-		      (let ((value (vc-match-substring 1)))
-			(if file
-			    (vc-file-setprop file (car properties) value))
-			value))
+		 (let ((value nil))
+		   (if (re-search-forward p nil t)
+		       (setq value (vc-match-substring 1)))
+		   (if file
+		       (vc-file-setprop file (car properties) value))
+		   value)
 	       (setq properties (cdr properties)))))
 	  patterns)
   )