summaryrefslogtreecommitdiff
path: root/chess.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-04-22 19:28:46 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-04-22 19:28:46 +0000
commit7987c62e7eb9a13cb9098dbd56b950bfa8714c0c (patch)
treeab7472ba88b370074ac744058baca488d6fed120 /chess.el
parent62c13bcfa1933274be856ac5840a933bbaca5f27 (diff)
bug fixes
Diffstat (limited to 'chess.el')
-rw-r--r--chess.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/chess.el b/chess.el
index 8018a5f..ba87480 100644
--- a/chess.el
+++ b/chess.el
@@ -206,16 +206,16 @@ available."
(defalias 'chess-session 'chess)
;;;###autoload
-(defun chess-create-display (perspective &optional display-only)
+(defun chess-create-display (perspective &optional modules-too)
"Create a display, letting the user's customization decide the style.
-If DISPLAY-ONLY is non-nil, then only a display is created, with none
-of the usual ancillary modules."
- (if display-only
- (car (chess-create-modules (list chess-default-display)
- 'chess--create-display
- (chess-game-create) perspective nil))
- (let ((display (cadr (chess-session 'none))))
- (chess-display-set-perspective* display perspective))))
+If MODULES-TOO is non-nil, also create and associate the modules
+listed in `chess-default-modules'."
+ (if modules-too
+ (let ((display (cadr (chess-session 'none))))
+ (chess-display-set-perspective* display perspective))
+ (car (chess-create-modules (list chess-default-display)
+ 'chess--create-display
+ (chess-game-create) perspective nil))))
(provide 'chess)