diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-08 23:03:39 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-08 23:03:39 +0000 |
| commit | c67544683ffed1660bad0d5e67a6e5d47e288be1 (patch) | |
| tree | b1fe54ca64b0458e753e77aec16368c012a77fb8 /chess-display.el | |
| parent | ecaf5a3842adc0bd38b069184a031b8530c620cb (diff) | |
*** no comment ***
Diffstat (limited to 'chess-display.el')
| -rw-r--r-- | chess-display.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/chess-display.el b/chess-display.el index aba88ec..9dc80a3 100644 --- a/chess-display.el +++ b/chess-display.el @@ -316,6 +316,7 @@ See `chess-display-type' for the different kinds of displays." (define-key map [?X] 'chess-display-quit) (define-key map [?M] 'chess-display-manual-move) (define-key map [?@] 'chess-display-remote) + (define-key map [? ] 'chess-display-pass) (define-key map [?<] 'chess-display-move-first) (define-key map [?,] 'chess-display-move-backward) @@ -467,6 +468,13 @@ Basically, it means we are playing, not editing or reviewing." (chess-display-set-game (chess-display-create 'chess-images t) (chess-display-game nil)))) +(defun chess-display-pass () + "Pass the move to your opponent. Only valid on the first move." + (interactive) + (when (and (chess-display-active-p) + (= 0 (chess-display-index nil))) + (chess-game-run-hooks chess-display-game 'pass))) + (defun chess-display-set-current (dir) "Change the currently displayed board. Direction may be - or +, to move forward or back, or t or nil to jump |
