From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Wed, 20 Feb 2008 10:40:46 +0000 (+0000)
Subject: Kill eol whitespace; nfc.
X-Git-Tag: emacs-pretest-23.0.90~7840
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/58db72a4d3c0bea5624ac04fec8d2010b2b7449d

Kill eol whitespace; nfc.
---

diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el
index 92374be84f..b9ad61292e 100644
--- a/lisp/vc-svn.el
+++ b/lisp/vc-svn.el
@@ -239,7 +239,7 @@ RESULT is a list of conses (FILE . STATE) for directory DIR."
 (defun vc-svn-create-repo ()
   "Create a new SVN repository."
   (vc-do-command nil 0 "svnadmin" '("create" "SVN"))
-  (vc-do-command nil 0 "svn" '(".") 
+  (vc-do-command nil 0 "svn" '(".")
 		 "checkout" (concat "file://" default-directory "SVN")))
 
 (defun vc-svn-register (files &optional rev comment)
@@ -405,7 +405,7 @@ uses locally for temp files must also be writeable by you on that host."
   (goto-char (point-min))
   (unless (re-search-forward "Repository Root: svn\\+ssh://\\([^/]+\\)\\(/.*\\)" nil t)
     (error "Repository information is unavailable."))
-  (let* ((tempfile (make-temp-file user-mail-address)) 
+  (let* ((tempfile (make-temp-file user-mail-address))
 	(host (match-string 1))
 	(directory (match-string 2))
 	(remotefile (concat host ":" tempfile)))
@@ -414,9 +414,9 @@ uses locally for temp files must also be writeable by you on that host."
       (write-region (point-min) (point-max) tempfile))
     (unless (vc-do-command nil 0 "scp" nil "-q" tempfile remotefile)
       (error "Copy of comment to %s failed" remotefile))
-    (unless (vc-do-command nil 0 "ssh" nil 
-			   "-q" host 
-			   (format "svnadmin setlog --bypass-hooks %s -r %s %s; rm %s" 
+    (unless (vc-do-command nil 0 "ssh" nil
+			   "-q" host
+			   (format "svnadmin setlog --bypass-hooks %s -r %s %s; rm %s"
 				   directory rev tempfile tempfile))
       (error "Log edit failed"))
   ))