# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 824270971 0
# Node ID 7932e133a44bf4c494ddfd70cdbcc39e21c4f0b4
# Parent  6aa8b322b4d7dcf9c45aa8ad427101f8ae66b7c7
(hanoi): Don't show line and column numbers.

diff -r 6aa8b322b4d7 -r 7932e133a44b lisp/play/hanoi.el
--- a/lisp/play/hanoi.el	Tue Feb 13 18:24:25 1996 +0000
+++ b/lisp/play/hanoi.el	Wed Feb 14 04:09:31 1996 +0000
@@ -149,10 +149,11 @@
 	  (setq i (1+ i))))
       (setq buffer-read-only t)
       (sit-for 0)
-      ;;
-      ;; do it!
-      ;;
-      (hanoi0 (1- nrings) pole-1 pole-2 pole-3)
+      ;; Disable display of line and column numbers, for speed.
+      (let ((line-number-mode nil)
+	    (column-number-mode nil))
+	;; do it!
+	(hanoi0 (1- nrings) pole-1 pole-2 pole-3))
       (goto-char (point-min))
       (message "Done")
       (setq buffer-read-only t)