diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-06-11 21:33:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-06-11 21:33:27 +0000 |
| commit | 59eb649b99f5c8c53ae79983444b54f0e01216d7 (patch) | |
| tree | 6363173301d970f127819c2f86d7ee1416a4efca | |
| parent | 2d271f543bfbdb26acba3b9fe09c68328c28900c (diff) | |
| download | emacs-59eb649b99f5c8c53ae79983444b54f0e01216d7.tar.gz | |
(setenv): Treat case as significant.
| -rw-r--r-- | lisp/env.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/env.el b/lisp/env.el index 256a3338e60..cc68de9cf00 100644 --- a/lisp/env.el +++ b/lisp/env.el @@ -40,6 +40,7 @@ This function works by modifying `process-environment'." (if (string-match "=" variable) (error "Environment variable name `%s' contains `='" variable) (let ((pattern (concat "\\`" (regexp-quote (concat variable "=")))) + (case-fold-search nil) (scan process-environment)) (while scan (cond |