[Emacs-diffs] Changes to emacs/lisp/server.el

[Juanma Barranquero]

Index: emacs/lisp/server.el
diff -c emacs/lisp/server.el:1.101 emacs/lisp/server.el:1.102
*** emacs/lisp/server.el:1.101  Wed Feb  9 15:50:41 2005
--- emacs/lisp/server.el        Mon May 16 11:33:47 2005
***************
*** 325,335 ****
                       (setq request "")))))
           ;; ARG is a line number option.
           ((string-match "\\`\\+[0-9]+\\'" arg)
!           (setq lineno (string-to-int (substring arg 1))))
           ;; ARG is line number:column option.
           ((string-match "\\`+\\([0-9]+\\):\\([0-9]+\\)\\'" arg)
!           (setq lineno (string-to-int (match-string 1 arg))
!                 columnno (string-to-int (match-string 2 arg))))
           (t
            ;; Undo the quoting that emacsclient does
            ;; for certain special characters.
--- 325,335 ----
                       (setq request "")))))
           ;; ARG is a line number option.
           ((string-match "\\`\\+[0-9]+\\'" arg)
!           (setq lineno (string-to-number (substring arg 1))))
           ;; ARG is line number:column option.
           ((string-match "\\`+\\([0-9]+\\):\\([0-9]+\\)\\'" arg)
!           (setq lineno (string-to-number (match-string 1 arg))
!                 columnno (string-to-number (match-string 2 arg))))
           (t
            ;; Undo the quoting that emacsclient does
            ;; for certain special characters.