Commits

zck committed 4ab8be7

use 'goto-char, then 'forward-line instead of 'goto-line, as recommended in documentation for 'goto-line

Comments (0)

Files changed (1)

minesweeper-mode.el

   (minesweeper-debug "starting refresh-square. (col, row) is (" (number-to-string col) ",\t" (number-to-string row) ")")
   (when (minesweeper-in-bounds row col)
     (let ((val (minesweeper-view-mine row col)))
-      (goto-line (1+ row))
+      (goto-char (point-min))
+      (forward-line row)
       (forward-char col)
       (let ((inhibit-read-only t))
         (delete-char 1)