Mercurial > emacs

comparison lisp/eshell/esh-var.el @ 47925:59510270b3ea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(eshell/define): Fix typo.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 17 Oct 2002 16:52:29 +0000
parents 06120f91eb06
children 695cf19ef79e d7ddb3e565de
comparison
equal deleted inserted replaced
47924:d9a861a5b9d6 47925:59510270b3ea
274 (forward-char) 274 (forward-char)
275 (list 'eshell-escape-arg 275 (list 'eshell-escape-arg
276 (eshell-parse-variable)))) 276 (eshell-parse-variable))))
277 277
278 (defun eshell/define (var-alias definition) 278 (defun eshell/define (var-alias definition)
279 "Define an VAR-ALIAS using DEFINITION." 279 "Define a VAR-ALIAS using DEFINITION."
280 (if (not definition) 280 (if (not definition)
281 (setq eshell-variable-aliases-list 281 (setq eshell-variable-aliases-list
282 (delq (assoc var-alias eshell-variable-aliases-list) 282 (delq (assoc var-alias eshell-variable-aliases-list)
283 eshell-variable-aliases-list)) 283 eshell-variable-aliases-list))
284 (let ((def (assoc var-alias eshell-variable-aliases-list)) 284 (let ((def (assoc var-alias eshell-variable-aliases-list))