diff lisp/server.el @ 41075:9bd3aeb8f5ae

(server-process-filter): Run pore/post-comment-hook before/after visiting the file.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 15 Nov 2001 12:19:08 +0000
parents cb428483fb22
children 49087a9d073e
line wrap: on
line diff
--- a/lisp/server.el	Thu Nov 15 11:02:23 2001 +0000
+++ b/lisp/server.el	Thu Nov 15 12:19:08 2001 +0000
@@ -284,7 +284,9 @@
 				  files))
 		      (setq lineno 1)
 		      (setq columnno 0))))))
+	      (run-hooks 'pre-command-hook)
 	      (server-visit-files files client nowait)
+	      (run-hooks 'post-command-hook)
 	      ;; CLIENT is now a list (CLIENTNUM BUFFERS...)
 	      (if (null (cdr client))
 		  ;; This client is empty; get rid of it immediately.