(getenv): Fix reverted by demand of Dan Nicolaescu

because it exposes further problems.

diff --git a/lisp/env.el b/lisp/env.el
index 346bd3b..33d4287 100644 (file)
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -212,8 +212,7 @@ 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)
-                               frame)))
+                                 variable))))
     (if (and enable-multibyte-characters value)
        (setq value (decode-coding-string value locale-coding-system)))
     (when (interactive-p)