diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-14 23:07:06 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-14 23:07:06 +0000 |
| commit | db5b94f367aebaeb019b46b2e2feb9f366d5d964 (patch) | |
| tree | 51fcd68cc026f631a7a50efa8795be46d340469d /chess-display.el | |
| parent | 4aa1c73a2e77af7bcf1bd24837c9f07488068cdd (diff) | |
*** no comment ***
Diffstat (limited to 'chess-display.el')
| -rw-r--r-- | chess-display.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/chess-display.el b/chess-display.el index 432f959..768ed72 100644 --- a/chess-display.el +++ b/chess-display.el @@ -81,7 +81,8 @@ makes moves, or any other changes to the underlying game." (with-current-buffer (generate-new-buffer "*Chessboard*") (setq buffer (current-buffer)) (chess-display-mode read-only) - (when (setq buffer (funcall handler 'initialize)) + (if (null (setq buffer (funcall handler 'initialize))) + (kill-buffer buffer) (add-hook 'kill-buffer-hook 'chess-display-quit nil t) (setq chess-display-style style chess-display-perspective perspective @@ -221,7 +222,7 @@ modeline." (defun chess-display-set-index (display index) (chess-with-current-buffer display (chess-display-set-index* nil index) - (chess-display-update nil))) + (chess-display-update nil t))) (defsubst chess-display-index (display) (chess-with-current-buffer display |