diff options
| -rw-r--r-- | lisp/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/emulation/vip.el | 8 |
2 files changed, 5 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d568d7d0ca4..d8f672c7234 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -4,6 +4,7 @@ `invalid'. * midnight.el, vc-cvs.el: Replace `illegal' with `invalid'. * emacs-lisp/cl-macs.el: Replace `illegal' with `invalid'. + * emulation/vip.el: Replace `illegal' with `invalid'. 2005-03-24 Stefan Monnier <monnier@iro.umontreal.ca> diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el index cbb0aa55aa8..af878085ba8 100644 --- a/lisp/emulation/vip.el +++ b/lisp/emulation/vip.el @@ -1,6 +1,6 @@ ;;; vip.el --- a VI Package for GNU Emacs -;; Copyright (C) 1986, 1987, 1988, 1992, 1993, 1998 +;; Copyright (C) 1986, 1987, 1988, 1992, 1993, 1998, 2005 ;; Free Software Foundation, Inc. ;; Author: Masahiko Sato <ms@sail.stanford.edu> @@ -2253,7 +2253,7 @@ a token has type \(command, address, end-mark\) and value." (setq ex-token-type "end-mark") (setq ex-token "goto")) (t - (error "illegal token"))))) + (error "invalid token"))))) (defun vip-ex (&optional string) "ex commands within VIP." @@ -2478,7 +2478,7 @@ a token has type \(command, address, end-mark\) and value." (setq ex-flag t) (forward-char 1))) (if (not (looking-at "[\n|]")) - (error "Illegal extra characters")))) + (error "Invalid extra characters")))) (defun vip-get-ex-count () (setq ex-variant nil @@ -2503,7 +2503,7 @@ a token has type \(command, address, end-mark\) and value." (setq ex-flag t) (forward-char 1))) (if (not (looking-at "[\n|]")) - (error "Illegal extra characters")))) + (error "Invalid extra characters")))) (defun vip-get-ex-file () "get a file name and set ex-variant, ex-append and ex-offset if found" |