1 files changed, 5 insertions, 5 deletions

diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 60f27052892..e15f2e4c873 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -1802,11 +1802,11 @@ if possible.  If there's no such frame, a new frame is created."
              (let ((line (car selection-range))
                    (start (cadr selection-range))
                    (end (nth 2 selection-range)))
-               (if (> line 0)
-                   (goto-line line)
-                 (if (and (> start 0) (> end 0))
-                     (progn (set-mark start)
-                            (goto-char end))))))
+               (if (>= line 0)
+                   (goto-line (1+ line))
+                 (if (and (>= start 0) (>= end 0))
+                     (progn (set-mark (1+ start))
+                            (goto-char (1+ end)))))))
             ((stringp search-text)
              (re-search-forward
               (mapconcat 'regexp-quote (split-string search-text) "\\|")