# HG changeset patch # User Stefan Monnier # Date 1188535304 0 # Node ID f86e7a61b05e946f50e89c322869b11a7386d651 # Parent e7303426ed25e90a1852e53ebc8daa2ff737396a Trivial spacing and comment. diff -r e7303426ed25 -r f86e7a61b05e lisp/env.el --- a/lisp/env.el Fri Aug 31 04:39:24 2007 +0000 +++ b/lisp/env.el Fri Aug 31 04:41:44 2007 +0000 @@ -192,12 +192,12 @@ (setq process-environment (setenv-internal process-environment variable value t)) (setq frame (frame-with-environment frame)) - (cond + (cond ((string-equal "TERM" variable) (set-frame-parameter frame 'term-environment-variable value)) ((string-equal "DISPLAY" variable) (set-frame-parameter frame 'display-environment-variable value)) - (t + (t (setq process-environment (setenv-internal process-environment variable value nil))))) value) @@ -316,5 +316,5 @@ (provide 'env) -;;; arch-tag: b7d6a8f7-bc81-46db-8e39-8d721d4ed0b8 +;; arch-tag: b7d6a8f7-bc81-46db-8e39-8d721d4ed0b8 ;;; env.el ends here