[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 01/01: (chess-display-mode-map): Bind DEL to `chess-input-shortcu
From: |
Mario Lang |
Subject: |
[elpa] 01/01: (chess-display-mode-map): Bind DEL to `chess-input-shortcut-delete |
Date: |
Mon, 16 Jun 2014 00:21:52 +0000 |
mlang pushed a commit to branch externals/chess
in repository elpa.
commit ce0e1286c30f67ee87a95220fe8d160779731ae1
Author: Mario Lang <address@hidden>
Date: Mon Jun 16 02:21:00 2014 +0200
(chess-display-mode-map): Bind DEL to `chess-input-shortcut-delete
---
ChangeLog | 2 ++
chess-display.el | 1 +
2 files changed, 3 insertions(+), 0 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 621a5c4..cbb7a13 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -5,6 +5,8 @@
event by adding a `redisplay' call just before the `post-move' emision.
(chess-display-select-piece): Use `chess-display-draw-square'.
(chess-display-draw-square): Make PIECE argument optional.
+ (chess-display-mode-map): Bind DEL to `chess-input-shortcut-delete'
+ as intended.
2014-06-15 Mario Lang <address@hidden>
diff --git a/chess-display.el b/chess-display.el
index dfde368..003511e 100644
--- a/chess-display.el
+++ b/chess-display.el
@@ -644,6 +644,7 @@ See `chess-display-type' for the different kinds of
displays."
?o ?O ?x ?=))
(define-key map (vector key) 'chess-input-shortcut))
(define-key map [backspace] 'chess-input-shortcut-delete)
+ (define-key map "\d" 'chess-input-shortcut-delete)
(define-key map [(control ?m)] 'chess-display-select-piece)
(define-key map [return] 'chess-display-select-piece)