diff options
| author | Alan Mackenzie <acm@muc.de> | 2015-11-23 14:49:23 +0000 |
|---|---|---|
| committer | Alan Mackenzie <acm@muc.de> | 2015-11-23 14:49:23 +0000 |
| commit | 5454708346433d08a41f77a12d416614dd113721 (patch) | |
| tree | 7cf94a2691e9d581a8e91199c5df096c08cdbbc8 /lisp/vc/vc-cvs.el | |
| parent | 12ad79c23e26e02007776105f99b03b0169c2a62 (diff) | |
| download | emacs-5454708346433d08a41f77a12d416614dd113721.tar.gz | |
Expunge occurrences of `setq' with an odd number of arguments.
* lisp/apropos.el (apropos-documentation):
* lisp/obsolete/complete.el (PC-include-file-all-completions):
* lisp/progmodes/compile.el (compilation-goto-locus):
* lisp/vc/vc-cvs.el (vc-cvs-parse-root): (twice)
Insert missing nil at end of `setq' forms.
* lisp/emacs-lisp/bytecomp.el (byte-compile-file-form-autoload): Remove an
erroneous trailing variable name from a setq, thus allowing a compilation
properly to track functions not defined at runtime.
Diffstat (limited to 'lisp/vc/vc-cvs.el')
| -rw-r--r-- | lisp/vc/vc-cvs.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/vc-cvs.el b/lisp/vc/vc-cvs.el index 99a990b4417..e21aece85ae 100644 --- a/lisp/vc/vc-cvs.el +++ b/lisp/vc/vc-cvs.el @@ -882,11 +882,11 @@ For an empty string, nil is returned (invalid CVS root)." (setq host uhost)) ;; Remove empty HOST (and (equal host "") - (setq host)) + (setq host nil)) ;; Fix windows style CVS root `:local:C:\\project\\cvs\\some\\dir' (and host (equal method "local") - (setq root (concat host ":" root) host)) + (setq root (concat host ":" root) host nil)) ;; Normalize CVS root record (list method user host root))))) |