[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r108738: * lisp/server.el (server-pro
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r108738: * lisp/server.el (server-process-filter): Remember dir in the |
Date: |
Mon, 25 Jun 2012 19:01:42 -0400 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 108738
author: Jim Diamond <address@hidden>
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Mon 2012-06-25 19:01:42 -0400
message:
* lisp/server.el (server-process-filter): Remember dir in the
process's `server-client-directory' properties.
modified:
lisp/ChangeLog
lisp/server.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-06-24 15:06:24 +0000
+++ b/lisp/ChangeLog 2012-06-25 23:01:42 +0000
@@ -1,3 +1,8 @@
+2012-06-25 Jim Diamond <address@hidden> (tiny change)
+
+ * server.el (server-process-filter): Remember dir in the
+ process's `server-client-directory' properties.
+
2012-06-24 Chong Yidong <address@hidden>
* xml.el (xml-parse-tag): Correctly handle comment embedded in
=== modified file 'lisp/server.el'
--- a/lisp/server.el 2012-04-20 10:37:57 +0000
+++ b/lisp/server.el 2012-06-25 23:01:42 +0000
@@ -1164,7 +1164,8 @@
(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))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r108738: * lisp/server.el (server-process-filter): Remember dir in the,
Stefan Monnier <=