Fix header searching.

Remove two CR characters that are not needed (since the regexp string
already has a "\r"), and also remove the strange "?" from the regexp (my
best guess is that this is a mistake due to some earlier attemt that
used the popular "\r?" pattern).

edit-server.el

@@ -416,12 +416,12 @@ non-nil, then STRING is also echoed to the message line."
       ;; look for "x-url" header
       (save-excursion
 	(goto-char (point-min))
-	(when (re-search-forward "^x-url: .*/\\{2,3\\}\\([^?\r\n
]+\\)" nil t)
+	(when (re-search-forward "^x-url: .*/\\{2,3\\}\\([^\r\n]+\\)" nil t)
 	  (setq edit-server-url (match-string 1))))
       ;; look for "x-file" header
       (save-excursion
 	(goto-char (point-min))
-	(when (re-search-forward "^x-file: \\([^?\r\n
]+\\)" nil t)
+	(when (re-search-forward "^x-file: \\([^\r\n]+\\)" nil t)
 	  (edit-server-log proc "Found x-file: %s" (match-string 1))
 	  (setq edit-server-file (match-string 1))))
       ;; look for head/body separator