diff options
Diffstat (limited to 'lisp/play/gametree.el')
| -rw-r--r-- | lisp/play/gametree.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/play/gametree.el b/lisp/play/gametree.el index 6fcc3136d07..215d95db341 100644 --- a/lisp/play/gametree.el +++ b/lisp/play/gametree.el @@ -201,7 +201,7 @@ should be no leading white space." (let ((boundary (concat "[ \t]*\\([1-9][0-9]*\\)\\(" gametree-full-ply-regexp "\\|" gametree-half-ply-regexp "\\)")) - (limit (save-excursion (beginning-of-line 1) (point)))) + (limit (line-beginning-position 1))) (if (looking-at boundary) (+ (* 2 (string-to-number (match-string 1))) (if (string-match gametree-half-ply-regexp (match-string 2)) 1 0)) @@ -617,5 +617,4 @@ shogi, etc.) players, it is a slightly modified version of Outline mode. (provide 'gametree) -;; arch-tag: aaa30943-9ae4-4cc1-813d-a46f96b7e4f1 ;;; gametree.el ends here |