Mercurial > emacs
changeset 96003:243cf028ce86
(log-view-per-file-logs): Pacify byte compiler.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Mon, 16 Jun 2008 08:54:29 +0000 |
parents | 26f719e36c03 |
children | 376c1b70d15b |
files | lisp/vc-svn.el |
diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-svn.el Mon Jun 16 08:53:27 2008 +0000 +++ b/lisp/vc-svn.el Mon Jun 16 08:54:29 2008 +0000 @@ -177,7 +177,7 @@ "Generate extra status headers for a Subversion working copy." (vc-svn-command "*vc*" 0 nil "info") (let ((repo - (save-excursion + (save-excursion (and (progn (set-buffer "*vc*") (goto-char (point-min)) @@ -407,7 +407,7 @@ (progn (unless (vc-do-command "*vc*" 0 "svnadmin" nil - "setlog" "--bypass-hooks" directory + "setlog" "--bypass-hooks" directory "-r" rev (format "%s" tempfile)) (error "Log edit failed")) (delete-file tempfile)) @@ -425,6 +425,8 @@ ;;; History functions ;;; +(defvar log-view-per-file-logs) + (define-derived-mode vc-svn-log-view-mode log-view-mode "SVN-Log-View" (require 'add-log) (set (make-local-variable 'log-view-per-file-logs) nil))