Mercurial > emacs

changeset 14564:7932e133a44b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(hanoi): Don't show line and column numbers.
author Karl Heuer <kwzh@gnu.org>
date Wed, 14 Feb 1996 04:09:31 +0000
parents 6aa8b322b4d7
children fa33ca883a52
files lisp/play/hanoi.el
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- 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)