Delete the hilit19 support--it doesn't work.

[gnu-emacs] / lisp / server.el

diff --git a/lisp/server.el b/lisp/server.el
index 7649660b72a551ebd7b23b494e02bafb98ec33a4..f94fb7e3ebb21eb46e72e60521ac8c6a9952515f 100644 (file)
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -205,10 +205,8 @@ Prefix arg means just kill any existing server communications subprocess."
                      ;; ARG is a line number option.
                      (setq lineno (read (substring arg 1)))
                    ;; ARG is a file name.
-                   ;; Collapse multiple slashes to single slashes,
-                   ;; since in Emacs a multiple slash is not equiv to one.
-                   (while (string-match "//+" arg)
-                     (setq arg (replace-match "/" t t arg)))
+                   ;; Collapse multiple slashes to single slashes.
+                   (setq arg (command-line-normalize-file-name arg))
                    (setq files
                          (cons (list arg lineno)
                                files))