Mercurial > emacs
comparison lisp/progmodes/sh-script.el @ 90133:4da4a09e8b1b
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-31
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 206-222)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 45-52)
- Update from CVS
- Update from CVS: texi Makefile.in CVS keyw cruft
- Update from CVS: ChangeLog tweaks
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 31 Mar 2005 09:58:14 +0000 |
parents | 6d92d69fae33 87f9bb9d3718 |
children | 02f1dbc4a199 |
comparison
equal
deleted
inserted
replaced
90132:4080fe8b4f0f | 90133:4da4a09e8b1b |
---|---|
2386 | 2386 |
2387 | 2387 |
2388 (defun sh-var-value (var &optional ignore-error) | 2388 (defun sh-var-value (var &optional ignore-error) |
2389 "Return the value of variable VAR, interpreting symbols. | 2389 "Return the value of variable VAR, interpreting symbols. |
2390 It can also return t or nil. | 2390 It can also return t or nil. |
2391 If an illegal value is found, throw an error unless Optional argument | 2391 If an invalid value is found, throw an error unless Optional argument |
2392 IGNORE-ERROR is non-nil." | 2392 IGNORE-ERROR is non-nil." |
2393 (let ((val (symbol-value var))) | 2393 (let ((val (symbol-value var))) |
2394 (cond | 2394 (cond |
2395 ((numberp val) | 2395 ((numberp val) |
2396 val) | 2396 val) |