mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-24 07:11:38 -07:00
Code Issues Projects Releases Wiki Activity

(server-process-filter): Don't force the authentication

Browse source 
string to be followed by "\n".
This commit is contained in:
Juanma Barranquero 2008-01-25 15:43:05 +00:00
parent 97a739d539
commit 38b9f0f370
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/server.el
View file

@ -767,7 +767,7 @@ The following commands are accepted by the client:
(server-log (concat "Received " string) proc)
;; First things first: let's check the authentication
(unless (process-get proc :authenticated)
(if (and (string-match "-auth \\(.*?\\)\n" string)
(if (and (string-match "-auth \\([!-~]+\\)\n?" string)
(equal (match-string 1 string) (process-get proc :auth-key)))
(progn
(setq string (substring string (match-end 0)))