summaryrefslogtreecommitdiff
path: root/lisp/play/hanoi.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-02-14 04:09:31 +0000
committerKarl Heuer <kwzh@gnu.org>1996-02-14 04:09:31 +0000
commit09d13f4cba2214c89b792dcf4acc114e346d1cc7 (patch)
tree8b0ee048b9123ae08f9fea1b1fe708bf0688aa81 /lisp/play/hanoi.el
parent72dc3bc7e7ea1479ee1e76fec17b681071ca22ac (diff)
downloademacs-09d13f4cba2214c89b792dcf4acc114e346d1cc7.tar.gz
(hanoi): Don't show line and column numbers.
Diffstat (limited to 'lisp/play/hanoi.el')
-rw-r--r--lisp/play/hanoi.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/play/hanoi.el b/lisp/play/hanoi.el
index 17184afeebd..12a700d458e 100644
--- a/lisp/play/hanoi.el
+++ b/lisp/play/hanoi.el
@@ -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)