summaryrefslogtreecommitdiff
path: root/lisp/play
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2015-05-04 20:20:40 -0400
committerGlenn Morris <rgm@gnu.org>2015-05-04 20:20:40 -0400
commitb409dd36574ef13b87b82915828e9ffa400de04a (patch)
treeaf420a50e7a83d36950e2d88186d9be21be32fe1 /lisp/play
parentb2f3c8071b79b6e0dff73d5fbc1dcaab0d8f2fbe (diff)
downloademacs-b409dd36574ef13b87b82915828e9ffa400de04a.tar.gz
* lisp/play/gametree.el (gametree-show-children-and-entry)
(gametree-apply-layout, gametree-mouse-show-subtree) (gametree-mouse-hide-subtree): Replace obsolete outline aliases.
Diffstat (limited to 'lisp/play')
-rw-r--r--lisp/play/gametree.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/play/gametree.el b/lisp/play/gametree.el
index ef55015a999..2c68c40d893 100644
--- a/lisp/play/gametree.el
+++ b/lisp/play/gametree.el
@@ -248,8 +248,8 @@ This value is simply the outline heading level of the current line."
;;;; outline layout
(defsubst gametree-show-children-and-entry ()
- (show-children)
- (show-entry))
+ (outline-show-children)
+ (outline-show-entry))
(defun gametree-entry-shown-p ()
(save-excursion
@@ -307,7 +307,7 @@ This value is simply the outline heading level of the current line."
(if (not first-time)
(outline-next-visible-heading 1))
(setq first-time nil)
- (hide-subtree)
+ (outline-hide-subtree)
(if (nth 0 layout)
(funcall (nth 0 layout)))
(if (not (and (nth 1 layout) (listp (nth 1 layout))))
@@ -393,7 +393,7 @@ depth AT-DEPTH or smaller is found."
(outline-up-heading 1)))
(beginning-of-line 1)
(let ((parent-depth (gametree-current-branch-depth)))
- (show-entry)
+ (outline-show-entry)
(condition-case nil
(outline-next-visible-heading 1)
(error
@@ -601,11 +601,11 @@ shogi, etc.) players, it is a slightly modified version of Outline mode.
(defun gametree-mouse-show-subtree (event)
(interactive "e")
(mouse-set-point event)
- (show-subtree))
+ (outline-show-subtree))
(defun gametree-mouse-hide-subtree (event)
(interactive "e")
(mouse-set-point event)
- (hide-subtree))
+ (outline-hide-subtree))
(define-key gametree-mode-map [M-down-mouse-2 M-mouse-2]
'gametree-mouse-break-line-here)
(define-key gametree-mode-map [S-down-mouse-1 S-mouse-1]