[Emacs-diffs] trunk r114434: lisp/vc/vc-sccs.el (vc-sccs-search-project-dir): Mark unused argument.

[Juanma Barranquero]

------------------------------------------------------------
revno: 114434
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Mon 2013-09-23 04:59:30 +0200
message:
  lisp/vc/vc-sccs.el (vc-sccs-search-project-dir): Mark unused argument.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/vc/vc-sccs.el             vcsccs.el-20091113204419-o5vbwnq5f7feedwu-1928

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-09-23 02:58:02 +0000
+++ b/lisp/ChangeLog    2013-09-23 02:59:30 +0000
@@ -1,5 +1,7 @@
 2013-09-23  Juanma Barranquero  <address@hidden>
 
+       * vc/vc-sccs.el (vc-sccs-search-project-dir): Mark unused argument.
+
        * autoarg.el (autoarg-kp-digit-argument):
        * electric.el (Electric-command-loop):
        * kmacro.el (kmacro-step-edit-insert):

=== modified file 'lisp/vc/vc-sccs.el'
--- a/lisp/vc/vc-sccs.el        2013-09-04 21:09:42 +0000
+++ b/lisp/vc/vc-sccs.el        2013-09-23 02:59:30 +0000
@@ -506,7 +506,7 @@
 ;; a (autoload 'vc-sccs-search-project-dir "vc-sccs") which would not
 ;; help us avoid loading vc-sccs.
 ;;;###autoload
-(progn (defun vc-sccs-search-project-dir (dirname basename)
+(progn (defun vc-sccs-search-project-dir (_dirname basename)
   "Return the name of a master file in the SCCS project directory.
 Does not check whether the file exists but returns nil if it does not
 find any project directory."