diff options
| author | Jim Diamond <Jim.Diamond@AcadiaU.ca> | 2012-06-25 19:01:42 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-06-25 19:01:42 -0400 |
| commit | 8c4f2952d44e050df328eb68833889b3ddb9bbbc (patch) | |
| tree | e2f399c40b98442b76bc7b4f470db386f515c924 | |
| parent | a35e580cbc2ab998f114881e9f48650a83e5ad8c (diff) | |
| download | emacs-8c4f2952d44e050df328eb68833889b3ddb9bbbc.tar.gz emacs-8c4f2952d44e050df328eb68833889b3ddb9bbbc.tar.bz2 emacs-8c4f2952d44e050df328eb68833889b3ddb9bbbc.zip | |
* lisp/server.el (server-process-filter): Remember dir in the
process's `server-client-directory' properties.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/server.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a03ee8228f1..02c81a1018d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-06-25 Jim Diamond <Jim.Diamond@AcadiaU.ca> (tiny change) + + * server.el (server-process-filter): Remember dir in the + process's `server-client-directory' properties. + 2012-06-24 Chong Yidong <cyd@gnu.org> * xml.el (xml-parse-tag): Correctly handle comment embedded in diff --git a/lisp/server.el b/lisp/server.el index 1e2f458ac9c..e17e1118847 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -1164,7 +1164,8 @@ The following commands are accepted by the client: (setq dir (pop args-left)) (if coding-system (setq dir (decode-coding-string dir coding-system))) - (setq dir (command-line-normalize-file-name dir))) + (setq dir (command-line-normalize-file-name dir)) + (process-put proc 'server-client-directory dir)) ;; Unknown command. (arg (error "Unknown command: %s" arg)))) |