summaryrefslogtreecommitdiff
path: root/chess-sound.el
diff options
context:
space:
mode:
Diffstat (limited to 'chess-sound.el')
-rw-r--r--chess-sound.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/chess-sound.el b/chess-sound.el
index 4a34121..b6c9669 100644
--- a/chess-sound.el
+++ b/chess-sound.el
@@ -90,6 +90,10 @@
(chess-sound (format "%c_" (downcase t-piece)))
(chess-sound (chess-index-to-coord target))))
+ (if (chess-ply-keyword ply :promote)
+ (chess-sound
+ (format "%c_" (downcase
+ (chess-ply-keyword ply :promote)))))
(if (chess-ply-keyword ply :en-passant)
(chess-sound "enpassant"))
(if (chess-ply-keyword ply :check)