diff options
| author | Richard M. Stallman <rms@gnu.org> | 2003-05-28 11:16:22 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2003-05-28 11:16:22 +0000 |
| commit | cccc806de7b564dcb5305aba07a41998414d9129 (patch) | |
| tree | 9f6ab82a8bab2b58053c67eaac154c9b654d542c /lisp/env.el | |
| parent | d6c135fb4fb52fc8741e00c587638dd01a0cec3d (diff) | |
| download | emacs-cccc806de7b564dcb5305aba07a41998414d9129.tar.gz | |
(substitute-env-vars): Fix typo.
Diffstat (limited to 'lisp/env.el')
| -rw-r--r-- | lisp/env.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/env.el b/lisp/env.el index eae724d148d..6aef5457a1c 100644 --- a/lisp/env.el +++ b/lisp/env.el @@ -63,12 +63,14 @@ If it is also not t, RET does not exit if it does non-null completion." `$FOO' where FOO is an environment variable name means to substitute the value of that variable. The variable name should be terminated with a character not a letter, digit or underscore; otherwise, enclose -the entire variable name in braces. Use `$$' to insert a single -dollar sign." +the entire variable name in braces. For instance, in `ab$cd-x', +`$cd' is treated as an environment variable. + +Use `$$' to insert a single dollar sign." (let ((start 0)) (while (string-match (eval-when-compile - (rx (or (and "$" (submatch (1+ (regexp "[:alnum:]_")))) + (rx (or (and "$" (submatch (1+ (regexp "[[:alnum:]_]")))) (and "${" (submatch (minimal-match (0+ anything))) "}") "$$"))) string start) |