Mercurial > emacs
changeset 14432:12f164226ba7
(vip-ex, ex-expand-filsyms, vip-execute-ex-command): Fix error format string.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Mon, 29 Jan 1996 23:19:25 +0000 |
| parents | d1b9ec5dc9fc |
| children | 20e489e1a0ef |
| files | lisp/emulation/viper-ex.el |
| diffstat | 1 files changed, 7 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/viper-ex.el Mon Jan 29 23:19:04 1996 +0000 +++ b/lisp/emulation/viper-ex.el Mon Jan 29 23:19:25 1996 +0000 @@ -489,7 +489,7 @@ )) )) ((eq ex-token-type 'non-command) - (error (format "`%s': %s" ex-token vip-BadExCommand))) + (error "`%s': %s" ex-token vip-BadExCommand)) ((eq ex-token-type 'whole) (setq address nil) (setq ex-addresses @@ -731,7 +731,7 @@ (setq cf buffer-file-name) (setq pf (ex-next nil t))) ; this finds alternative file name (if (and (null cf) (string-match "[^\\]%\\|\\`%" cmd)) - (error "No current file to substitute for `\%'")) + (error "No current file to substitute for `%%'")) (if (and (null pf) (string-match "[^\\]#\\|\\`#" cmd)) (error "No alternate file to substitute for `#'")) (save-excursion @@ -944,22 +944,19 @@ (string= ex-token "change") (string= ex-token "insert") (string= ex-token "open")) - (error - (format "`%s': Obsolete command, not supported by Viper" - ex-token))) + (error "`%s': Obsolete command, not supported by Viper" + ex-token)) ((or (string= ex-token "abbreviate") (string= ex-token "unabbreviate")) (error - (format "`%s': Vi-style abbrevs are obsolete. Use the more powerful Emacs abbrevs" - ex-token))) + ex-token)) ((or (string= ex-token "list") (string= ex-token "print") (string= ex-token "z") (string= ex-token "#")) - (error - (format "`%s': Command not implemented in Viper" ex-token))) - (t (error (format "`%s': %s" ex-token vip-BadExCommand))))) + (error "`%s': Command not implemented in Viper" ex-token)) + (t (error "`%s': %s" ex-token vip-BadExCommand)))) (defun vip-undisplayed-files () (mapcar