Mercurial > emacs

comparison lisp/eshell/esh-var.el @ 60915:a72129314db4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* eshell/esh-io.el, eshell/esh-var.el: Replace `illegal' with `invalid'.
author Werner LEMBERG <wl@gnu.org>
date Fri, 25 Mar 2005 08:33:09 +0000
parents 02020f3d155a
children b89e30bcd2bb 4da4a09e8b1b
comparison
equal deleted inserted replaced
60914:62dc372efbe1 60915:a72129314db4
1 ;;; esh-var.el --- handling of variables 1 ;;; esh-var.el --- handling of variables
2 2
3 ;; Copyright (C) 1999, 2000 Free Software Foundation 3 ;; Copyright (C) 1999, 2000, 2005 Free Software Foundation
4 4
5 ;; Author: John Wiegley <johnw@gnu.org> 5 ;; Author: John Wiegley <johnw@gnu.org>
6 6
7 ;; This file is part of GNU Emacs. 7 ;; This file is part of GNU Emacs.
8 8
566 (setq value 566 (setq value
567 (mapcar 'eshell-convert 567 (mapcar 'eshell-convert
568 (split-string value separator))))) 568 (split-string value separator)))))
569 (cond 569 (cond
570 ((< (length refs) 0) 570 ((< (length refs) 0)
571 (error "Illegal array variable index: %s" 571 (error "Invalid array variable index: %s"
572 (eshell-stringify refs))) 572 (eshell-stringify refs)))
573 ((= (length refs) 1) 573 ((= (length refs) 1)
574 (setq value (eshell-index-value value (car refs)))) 574 (setq value (eshell-index-value value (car refs))))
575 (t 575 (t
576 (let ((new-value (list t))) 576 (let ((new-value (list t)))