# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 744770666 0
# Node ID 208145c77950eff8ffd8ed64ed9c02dc9c856cd3
# Parent  9fab557f1e166c7cd85d27d1531ea7e1398de071
* vc.el (vc-diff, vc-directory-18): Add missing paren to end of
vc-diff, and remove extra paren from vc-directory-18.

diff -r 9fab557f1e16 -r 208145c77950 lisp/vc.el
--- 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))