diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-03 20:57:43 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-03 20:57:43 +0000 |
| commit | c3f24aabda7fdefd4672367641aae1a80789a8f2 (patch) | |
| tree | 8a80a6bb5eb62215d3ac18e9ff03d845d4cb86b7 /chess-display.el | |
| parent | c7e39a22fe0a2bc6da7226fcb29f42fc65e08659 (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 526d8ca..5f11e56 100644 --- a/chess-display.el +++ b/chess-display.el @@ -86,7 +86,7 @@ (draw (intern-soft (concat name "-draw"))) (highlight (intern-soft (concat name "-highlight"))) (initialize (intern-soft (concat name "-initialize")))) - (unless initialize + (unless draw (error "There is no known chessboard display style '%s'" name)) (with-current-buffer (generate-new-buffer "*Chessboard*") (setq cursor-type nil @@ -96,7 +96,8 @@ chess-display-perspective perspective chess-display-search-function search-func) (chess-display-mode) - (funcall initialize) + (if initialize + (funcall initialize)) (if session (let ((game (chess-session-data session 'current-game))) (if game |