emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] trunk r114238: * vc/vc-svn.el (vc-svn-dir-status-files, vc


From: Glenn Morris
Subject: [Emacs-diffs] trunk r114238: * vc/vc-svn.el (vc-svn-dir-status-files, vc-svn-dir-extra-headers)
Date: Thu, 12 Sep 2013 06:54:17 +0000
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 114238
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2013-09-11 23:53:57 -0700
message:
  * vc/vc-svn.el (vc-svn-dir-status-files, vc-svn-dir-extra-headers)
  (vc-svn-ignore): Mark unused arguments.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/vc/vc-svn.el              vcsvn.el-20091113204419-o5vbwnq5f7feedwu-2575
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-09-12 06:50:18 +0000
+++ b/lisp/ChangeLog    2013-09-12 06:53:57 +0000
@@ -1,5 +1,8 @@
 2013-09-12  Glenn Morris  <address@hidden>
 
+       * vc/vc-svn.el (vc-svn-dir-status-files, vc-svn-dir-extra-headers)
+       (vc-svn-ignore): Mark unused arguments.
+
        * subr.el (do-after-load-evaluation): Also give compiler warnings
        when obsolete files are used (except by obsolete files).
 

=== modified file 'lisp/vc/vc-svn.el'
--- a/lisp/vc/vc-svn.el 2013-09-12 06:21:33 +0000
+++ b/lisp/vc/vc-svn.el 2013-09-12 06:53:57 +0000
@@ -234,12 +234,12 @@
   (vc-run-delayed
    (vc-svn-after-dir-status callback remote))))
 
-(defun vc-svn-dir-status-files (dir files _default-state callback)
+(defun vc-svn-dir-status-files (_dir files _default-state callback)
   (apply 'vc-svn-command (current-buffer) 'async nil "status" files)
   (vc-run-delayed
    (vc-svn-after-dir-status callback)))
 
-(defun vc-svn-dir-extra-headers (dir)
+(defun vc-svn-dir-extra-headers (_dir)
   "Generate extra status headers for a Subversion working copy."
   (let (process-file-side-effects)
     (vc-svn-command "*vc*" 0 nil "info"))
@@ -352,7 +352,7 @@
                (concat "-r" rev))
           (vc-switches 'SVN 'checkout))))
 
-(defun vc-svn-ignore (file &optional directory remove)
+(defun vc-svn-ignore (file &optional _directory _remove)
   "Ignore FILE under Subversion.
 FILE is a file wildcard, relative to the root directory of DIRECTORY."
   (vc-svn-command t 0 file "propedit" "svn:ignore"))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]