diff options
author | Stefan Kangas <stefankangas@gmail.com> | 2022-08-17 12:48:02 +0200 |
---|---|---|
committer | Stefan Kangas <stefankangas@gmail.com> | 2022-08-17 12:52:56 +0200 |
commit | a631067fba54e873122d40106fec4dacd8eba8db (patch) | |
tree | c26c4f3dea156e26685c5d1fbe8e4705d265375f /lisp/emulation/viper-util.el | |
parent | af4cfb519415ed3c1d6d036aac908e4f9ee383eb (diff) | |
download | emacs-a631067fba54e873122d40106fec4dacd8eba8db.tar.gz |
Fix some recently introduced byte-compiler warnings
* lisp/emulation/viper-util.el (viper-key-to-character):
* lisp/vc/vc-svn.el (vc-svn-dir-extra-headers): Fix warnings.
* lisp/net/eudc-export.el (eudc-batch-export-records-to-bbdb):
Fix buglet.
Diffstat (limited to 'lisp/emulation/viper-util.el')
-rw-r--r-- | lisp/emulation/viper-util.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el index 25c55acf96c..46dbd7f24d5 100644 --- a/lisp/emulation/viper-util.el +++ b/lisp/emulation/viper-util.el @@ -1020,7 +1020,6 @@ Otherwise return the normal value." (string-to-char (symbol-name key))) ((and (listp key) (eq (car key) 'control) - (symbol-name (nth 1 key)) (= 1 (length (symbol-name (nth 1 key))))) (read (format "?\\C-%s" (symbol-name (nth 1 key))))) (t key))) |