Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
be94d713
Commit
be94d713
authored
Sep 11, 2013
by
Glenn Morris
Browse files
* vc/vc-svn.el (vc-svn-dir-status-files, vc-svn-dir-extra-headers)
(vc-svn-ignore): Mark unused arguments.
parent
759880bf
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
3 deletions
+6
-3
lisp/ChangeLog
lisp/ChangeLog
+3
-0
lisp/vc/vc-svn.el
lisp/vc/vc-svn.el
+3
-3
No files found.
lisp/ChangeLog
View file @
be94d713
2013-09-12 Glenn Morris <rgm@gnu.org>
* 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).
...
...
lisp/vc/vc-svn.el
View file @
be94d713
...
...
@@ -234,12 +234,12 @@ RESULT is a list of conses (FILE . STATE) for directory DIR."
(
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 @@ This is only possible if SVN is responsible for FILE's directory.")
(
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"
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment