aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2007-08-31 04:41:44 +0000
committerStefan Monnier2007-08-31 04:41:44 +0000
commitbb8ef97334b90e8f1de4a037902d969e8d1dd1de (patch)
tree1311d39b43ccd55348e7c61e9a397caa228bc0e5
parent6b8e474c53700bb1d039abf8a563c042bde5e0ee (diff)
downloademacs-bb8ef97334b90e8f1de4a037902d969e8d1dd1de.tar.gz
emacs-bb8ef97334b90e8f1de4a037902d969e8d1dd1de.zip
Trivial spacing and comment.
-rw-r--r--lisp/env.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/env.el b/lisp/env.el
index bebfed3fed6..51bcc12c3c1 100644
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -192,12 +192,12 @@ a side-effect."
192 (setq process-environment (setenv-internal process-environment 192 (setq process-environment (setenv-internal process-environment
193 variable value t)) 193 variable value t))
194 (setq frame (frame-with-environment frame)) 194 (setq frame (frame-with-environment frame))
195 (cond 195 (cond
196 ((string-equal "TERM" variable) 196 ((string-equal "TERM" variable)
197 (set-frame-parameter frame 'term-environment-variable value)) 197 (set-frame-parameter frame 'term-environment-variable value))
198 ((string-equal "DISPLAY" variable) 198 ((string-equal "DISPLAY" variable)
199 (set-frame-parameter frame 'display-environment-variable value)) 199 (set-frame-parameter frame 'display-environment-variable value))
200 (t 200 (t
201 (setq process-environment (setenv-internal process-environment 201 (setq process-environment (setenv-internal process-environment
202 variable value nil))))) 202 variable value nil)))))
203 value) 203 value)
@@ -316,5 +316,5 @@ All the VALUEFORMs are evaluated before any variables are set."
316 316
317(provide 'env) 317(provide 'env)
318 318
319;;; arch-tag: b7d6a8f7-bc81-46db-8e39-8d721d4ed0b8 319;; arch-tag: b7d6a8f7-bc81-46db-8e39-8d721d4ed0b8
320;;; env.el ends here 320;;; env.el ends here