From 94d73f17d2c3db6584b8d379441b21bdf1bdb3bd Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Wed, 17 Apr 2002 00:58:32 +0000 Subject: *** no comment *** --- chess-display.el | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) (limited to 'chess-display.el') diff --git a/chess-display.el b/chess-display.el index 0c4c262..037d44b 100644 --- a/chess-display.el +++ b/chess-display.el @@ -236,10 +236,6 @@ also view the same game." (aset chess-display-index-positions 0 (point-min))))) (aref chess-display-index-positions index))) -(defsubst chess-display-goto-index (index) - (chess-with-current-buffer display - (goto-char (chess-display-index-pos nil index)))) - (defun chess-display-paint-move (display ply) (chess-with-current-buffer display (let ((position (chess-ply-pos ply)) @@ -569,10 +565,7 @@ Basically, it means we are playing, not editing or reviewing." (defun chess-display-duplicate (style) (interactive (list (concat "chess-" - (read-from-minibuffer - "Create new display using style: " - (substring (symbol-name (chess-display-style nil)) - 0 (length "chess-")))))) + (read-from-minibuffer "Create new display using style: ")))) (chess-display-clone (current-buffer) (intern-soft style) (chess-display-perspective nil))) -- cgit v1.2.3