Mercurial > emacs

changeset 3667:f4a7ac2ec651

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(setenv): Treat case as significant.
author Richard M. Stallman <rms@gnu.org>
date Fri, 11 Jun 1993 21:33:27 +0000
parents c7ff787b096f
children 87f7ff6bba51
files lisp/env.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/env.el	Fri Jun 11 21:06:14 1993 +0000
+++ b/lisp/env.el	Fri Jun 11 21:33:27 1993 +0000
@@ -40,6 +40,7 @@
   (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