diff options
| -rw-r--r-- | lisp/server.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/server.el b/lisp/server.el index d8bd83b839f..f0ce3c670e0 100644 --- a/lisp/server.el +++ b/lisp/server.el | |||
| @@ -677,9 +677,9 @@ The following commands are accepted by the client: | |||
| 677 | 677 | ||
| 678 | ;; -position LINE:COLUMN: Set point to the given position in the next file. | 678 | ;; -position LINE:COLUMN: Set point to the given position in the next file. |
| 679 | ((and (equal "-position" arg) (string-match "\\+\\([0-9]+\\):\\([0-9]+\\) " request)) | 679 | ((and (equal "-position" arg) (string-match "\\+\\([0-9]+\\):\\([0-9]+\\) " request)) |
| 680 | (setq request (substring request (match-end 0)) | 680 | (setq lineno (string-to-int (match-string 1 request)) |
| 681 | lineno (string-to-int (match-string 1 request)) | 681 | columnno (string-to-int (match-string 2 request)) |
| 682 | columnno (string-to-int (match-string 2 request)))) | 682 | request (substring request (match-end 0)))) |
| 683 | 683 | ||
| 684 | ;; -file FILENAME: Load the given file. | 684 | ;; -file FILENAME: Load the given file. |
| 685 | ((and (equal "-file" arg) (string-match "\\([^ ]+\\) " request)) | 685 | ((and (equal "-file" arg) (string-match "\\([^ ]+\\) " request)) |