summaryrefslogtreecommitdiff
path: root/lisp/env.el
diff options
context:
space:
mode:
authorDavid Kastrup <dak@gnu.org>2007-05-13 20:54:15 +0000
committerDavid Kastrup <dak@gnu.org>2007-05-13 20:54:15 +0000
commit30ad056271fff9c57e25aff6ac00eb2243efd6f9 (patch)
tree49d24fdf89e68bc093fb8ff3852b2445d62b6587 /lisp/env.el
parent2ccf59411f334a41f2c64b1220a5d45f11071cae (diff)
downloademacs-30ad056271fff9c57e25aff6ac00eb2243efd6f9.tar.gz
(getenv): Pass frame to getenv-internal.
Diffstat (limited to 'lisp/env.el')
-rw-r--r--lisp/env.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/env.el b/lisp/env.el
index 33d4287312f..346bd3be75e 100644
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -212,7 +212,8 @@ in the environment list of the selected frame."
(let ((value (getenv-internal (if (multibyte-string-p variable)
(encode-coding-string
variable locale-coding-system)
- variable))))
+ variable)
+ frame)))
(if (and enable-multibyte-characters value)
(setq value (decode-coding-string value locale-coding-system)))
(when (interactive-p)