From: Juanma Barranquero Date: Sun, 27 Jan 2008 22:47:58 +0000 (+0000) Subject: (server-log-time-function): Doc fix. X-Git-Tag: emacs-pretest-23.0.90~8356 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f03ea9d918bf696a78ce34b69914f4457a002816;p=emacs.git (server-log-time-function): Doc fix. (server-buffer): Fix typo in docstring. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f54b105032d..9dbabec7bf9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-01-27 Juanma Barranquero + + * server.el (server-log-time-function): Doc fix. + (server-buffer): Fix typo in docstring. + 2008-01-27 Martin Rudalics * view.el (view-buffer): Explain in doc-string why exit-action @@ -16,11 +21,11 @@ 2007-01-27 Jan Nieuwenhuizen - * add-log.el (change-log-search-file-name, change-log-find-file): - New function. + * add-log.el (change-log-search-file-name, change-log-find-file): + New function. (change-log-font-lock-keywords): Move file name matching ... (change-log-file-names-re): ... here. New defconst. - (change-log-mode-map): New binding C-c C-f to change-log-find-file. + (change-log-mode-map): New binding C-c C-f to change-log-find-file. 2008-01-27 Alan Mackenzie @@ -41,7 +46,7 @@ 2008-01-27 Alan Mackenzie - * progmodes/cc-vars.el (c-hanging-braces-alist): new element for + * progmodes/cc-vars.el (c-hanging-braces-alist): New element for arglist-cont-nonempty. * progmodes/cc-cmds.el (c-brace-newlines): Determine the newlines diff --git a/lisp/server.el b/lisp/server.el index ad4608f2fd2..024df504779 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -292,13 +292,13 @@ If NOFRAME is non-nil, let the frames live. (To be used from (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 @@ The following commands are accepted by the client: ;; 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))))))