Mercurial > emacs
diff lisp/play/landmark.el @ 104390:c6ae8d43800c
Use forward-line, not goto-line.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Fri, 21 Aug 2009 07:40:24 +0000 |
| parents | a9dc0e7c3f2b |
| children | 4b8f024e6993 |
line wrap: on
line diff
--- a/lisp/play/landmark.el Fri Aug 21 07:36:41 2009 +0000 +++ b/lisp/play/landmark.el Fri Aug 21 07:40:24 2009 +0000 @@ -876,7 +876,8 @@ (defun lm-goto-xy (x y) "Move point to square at X, Y coords." (let ((inhibit-point-motion-hooks t)) - (goto-line (+ 1 lm-y-offset (* lm-square-height (1- y))))) + (goto-char (point-min)) + (forward-line (+ lm-y-offset (* lm-square-height (1- y))))) (move-to-column (+ lm-x-offset (* lm-square-width (1- x))))) (defun lm-plot-square (square value)