vc/vc-src.el (vc-src-do-comand): Prepend -- to file argument list
* vc/vc-src.el (vc-src-do-comand): Prepend -- to file argument list, avoids problems witth names containing hyphens.
This commit is contained in:
parent
bc71376cc0
commit
baab20d73e
2 changed files with 11 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2014-12-09 Eric S. Raymond <esr@snark.thyrsus.com>
|
||||
|
||||
* vc/vc-src.el (vc-src-do-comand): Prepend -- to file argument
|
||||
list, avoids problems witth names containing hyphens.
|
||||
|
||||
2014-12-09 Wilson Snyder <wsnyder@wsnyder.org>
|
||||
|
||||
Sync with upstream verilog-mode revision aa4b777.
|
||||
|
|
|
@ -193,7 +193,12 @@ For a description of possible values, see `vc-check-master-templates'."
|
|||
(defun vc-src-command (buffer file-or-list &rest flags)
|
||||
"A wrapper around `vc-do-command' for use in vc-src.el.
|
||||
This function differs from vc-do-command in that it invokes `vc-src-program'."
|
||||
(apply 'vc-do-command (or buffer "*vc*") 0 vc-src-program file-or-list flags))
|
||||
(let (file-list)
|
||||
(cond ((stringp file-or-list)
|
||||
(setq file-list (list "--" file-or-list)))
|
||||
(file-or-list
|
||||
(setq file-list (cons "--" file-or-list))))
|
||||
(apply 'vc-do-command (or buffer "*vc*") 0 vc-src-program file-list flags)))
|
||||
|
||||
(defun vc-src-working-revision (file)
|
||||
"SRC-specific version of `vc-working-revision'."
|
||||
|
|
Loading…
Add table
Reference in a new issue