[Emacs-diffs] Changes to emacs/lisp/term/mac-win.el, v [EMACS_22_BASE]

[YAMAMOTO Mitsuharu]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     YAMAMOTO Mitsuharu <mituharu>   08/04/12 01:59:41

Index: mac-win.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/term/mac-win.el,v
retrieving revision 1.88.2.9
retrieving revision 1.88.2.10
diff -u -b -r1.88.2.9 -r1.88.2.10
--- mac-win.el  29 Mar 2008 00:48:33 -0000      1.88.2.9
+++ mac-win.el  12 Apr 2008 01:59:41 -0000      1.88.2.10
@@ -1738,11 +1738,11 @@
             (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) "\\|")