Mercurial > emacs
diff lisp/play/gomoku.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 | 328150f0cf76 |
line wrap: on
line diff
--- a/lisp/play/gomoku.el Fri Aug 21 07:36:41 2009 +0000 +++ b/lisp/play/gomoku.el Fri Aug 21 07:40:24 2009 +0000 @@ -989,7 +989,8 @@ (defun gomoku-goto-xy (x y) "Move point to square at X, Y coords." (let ((inhibit-point-motion-hooks t)) - (goto-line (+ 1 gomoku-y-offset (* gomoku-square-height (1- y))))) + (goto-char (point-min)) + (forward-line (+ gomoku-y-offset (* gomoku-square-height (1- y))))) (move-to-column (+ gomoku-x-offset (* gomoku-square-width (1- x))))) (defun gomoku-plot-square (square value)