From 986af48943f06c660b935551c1be38ec2153fe32 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Wed, 1 May 2002 06:07:25 +0000 Subject: *** no comment *** --- chess-display.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'chess-display.el') diff --git a/chess-display.el b/chess-display.el index c90f180..2faf4b3 100644 --- a/chess-display.el +++ b/chess-display.el @@ -527,6 +527,7 @@ See `chess-display-type' for the different kinds of displays." (define-key map [?\{] 'chess-display-annotate) (define-key map [?\"] 'chess-display-chat) (define-key map [?\'] 'chess-display-chat) + (define-key map [?\~] 'chess-display-check-autosave) (define-key map [(control ?r)] 'chess-display-search-backward) (define-key map [(control ?s)] 'chess-display-search-forward) @@ -830,6 +831,12 @@ Basically, it means we are playing, not editing or reviewing." (chess-game-run-hooks chess-module-game 'force) (ding))) +(defun chess-display-check-autosave () + (interactive) + (if (chess-display-active-p) + (chess-game-run-hooks chess-module-game 'check-autosave) + (ding))) + (defun chess-display-resign () "Resign the current game." (interactive) -- cgit v1.2.3