diff options
author | Jim Blandy <jimb@redhat.com> | 1993-08-08 00:44:26 +0000 |
---|---|---|
committer | Jim Blandy <jimb@redhat.com> | 1993-08-08 00:44:26 +0000 |
commit | 6013de2d51b4a559b29cffcc19a0aa00c85f1e7b (patch) | |
tree | 46969cb184bbfb18383238ab548d093554f73c8a /lisp/vc.el | |
parent | eb9f63a442764245a63d4982ee1efb4176af04f8 (diff) | |
download | emacs-6013de2d51b4a559b29cffcc19a0aa00c85f1e7b.tar.gz |
* vc.el (vc-diff, vc-directory-18): Add missing paren to end of
vc-diff, and remove extra paren from vc-directory-18.
Diffstat (limited to 'lisp/vc.el')
-rw-r--r-- | lisp/vc.el | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 7eb4b5c8f69..7a0102cd71d 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -739,7 +739,8 @@ and two version designators specifying which versions to compare." (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 @@ and two version designators specifying which versions to compare." (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 @@ on a buffer attached to the file named in the current Dired buffer line." (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)) |