changeset 4480:208145c77950

* vc.el (vc-diff, vc-directory-18): Add missing paren to end of vc-diff, and remove extra paren from vc-directory-18.
author Jim Blandy <jimb@redhat.com>
date Sun, 08 Aug 1993 00:44:26 +0000
parents 9fab557f1e16
children c40febdb9967
files lisp/vc.el
diffstat 1 files changed, 5 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Sun Aug 08 00:20:22 1993 +0000
+++ b/lisp/vc.el	Sun Aug 08 00:44:26 1993 +0000
@@ -739,7 +739,8 @@
   (if historic
       (call-interactively 'vc-version-diff)
     (if (or (null buffer-file-name) (null (vc-name buffer-file-name)))
-	(error "There is no version-control master associated with this buffer"))
+	(error
+	 "There is no version-control master associated with this buffer"))
     (let ((file buffer-file-name)
 	  unchanged)
       (or (and file (vc-name file))
@@ -763,12 +764,8 @@
 	      (setq unchanged t)
 	      (message "No changes to %s since latest version." file))
 	  (goto-char (point-min))
-	  (shrink-window-if-larger-than-buffer)
-	)
-      (not unchanged)
-      )
-    )
-  )
+	  (shrink-window-if-larger-than-buffer)))
+      (not unchanged))))
 
 (defun vc-version-diff (file rel1 rel2)
   "For FILE, report diffs between two stored versions REL1 and REL2 of it.
@@ -954,7 +951,7 @@
 	  (shrink-window-if-larger-than-buffer)))
       (message "No files are currently %s under %s"
 	       (if verbose "registered" "locked") default-directory))
-    ))
+    )
 
 (or (boundp 'minor-mode-map-alist)
     (fset 'vc-directory 'vc-directory-18))