# HG changeset patch # User Juanma Barranquero # Date 1201473921 0 # Node ID 1da8bfe80e01148a6b696c024610ce2389f32f17 # Parent 0d96788fea723982947d6dbcd09d28000356919e (server-log-time-function): Doc fix. (server-buffer): Fix typo in docstring. diff -r 0d96788fea72 -r 1da8bfe80e01 lisp/server.el --- a/lisp/server.el Sun Jan 27 22:21:45 2008 +0000 +++ b/lisp/server.el Sun Jan 27 22:45:21 2008 +0000 @@ -292,13 +292,13 @@ (server-log "Deleted" proc)))) (defvar server-log-time-function 'current-time-string - "Function to generate timestamps for the *server* buffer.") + "Function to generate timestamps for `server-buffer'.") (defconst server-buffer " *server*" "Buffer used internally by Emacs's server. One use is to log the I/O for debugging purposes (see `server-log'), the other is to provide a current buffer in which the process filter can -safely let-bind buffer-local variables like default-directory.") +safely let-bind buffer-local variables like `default-directory'.") (defvar server-log nil "If non-nil, log the server's inputs and outputs in the `server-buffer'.") @@ -952,8 +952,8 @@ ;; Use the same cwd as the emacsclient, if possible, so ;; relative file names work correctly, even in `eval'. (let ((default-directory - (if (and dir (file-directory-p dir)) - dir default-directory))) + (if (and dir (file-directory-p dir)) + dir default-directory))) (server-execute proc files nowait commands dontkill frame tty-name))))))