mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

server.el: Don't change the default directory in the *scratch* buffer.

Browse source 
* lisp/server.el (server-process-filter): Don't change default-directory
  in *scratch*.

Revision: emacs@sv.gnu.org/emacs--multi-tty--0--patch-11
Creator:  Karoly Lorentey <karoly@lorentey.hu>
This commit is contained in:
Miles Bader 2007-05-20 23:27:36 +00:00
parent caf49fb043
commit 3c28868aeb
2 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog.multi-tty
View file

@ -1,3 +1,8 @@
2007-05-20 L$,1 q(Brentey K,Aa(Broly <lorentey@elte.hu>
* lisp/server.el (server-process-filter): Don't change
default-directory in *scratch*.
2007-05-19 Dan Nicolaescu <dann@ics.uci.edu>
* term/mac-win.el: Provide mac-win.

2
lisp/server.el
View file

@ -769,7 +769,6 @@ The following commands are accepted by the client:
;; Display *scratch* by default.
(switch-to-buffer (get-buffer-create "*scratch*") 'norecord)
(if dir (setq default-directory dir))
(setq dontkill t))
;; This emacs does not support X.
@ -826,7 +825,6 @@ The following commands are accepted by the client:
;; Display *scratch* by default.
(switch-to-buffer (get-buffer-create "*scratch*") 'norecord)
(if dir (setq default-directory dir))
;; Reply with our pid.
(server-send-string proc (concat "-emacs-pid " (number-to-string (emacs-pid)) "\n"))