Mercurial > emacs

changeset 83130:20f9fa3c5131

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix environment variables on emacsclient frames. lisp/server.el (server-getenv): Fix string lookup in alist. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-170
author Karoly Lorentey <lorentey@elte.hu>
date Sun, 23 May 2004 03:37:58 +0000
parents b1ded6fb31d1
children 24e9d5ea9a88
files lisp/server.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/server.el	Sun May 23 02:34:53 2004 +0000
+++ b/lisp/server.el	Sun May 23 03:37:58 2004 +0000
@@ -891,7 +891,7 @@
       (setq env (server-client-get (car clients) 'environment))
       (if (null env)
 	  (getenv variable)
-	(assq variable env)))))
+	(cdr (assoc variable env))))))
 
 (defun server-unload-hook ()
   (server-start t)