From: Werner LEMBERG Date: Fri, 25 Mar 2005 08:30:01 +0000 (+0000) Subject: * emulation/vip.el: Replace `illegal' with `invalid'. X-Git-Tag: ttn-vms-21-2-B4~1548 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d00fa0a4b38917bf2b0d63c43864e4230d52b717;p=emacs.git * emulation/vip.el: Replace `illegal' with `invalid'. --- 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 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 @@ -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"