From 0bad9bdd7634f039d5a30cfb19b100bbfe54d18e Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Wed, 10 Apr 2002 01:17:48 +0000
Subject: Support smart killing/yanking

---
 chess-ics1.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'chess-ics1.el')

diff --git a/chess-ics1.el b/chess-ics1.el
index 8a6e24d..0ce297e 100644
--- a/chess-ics1.el
+++ b/chess-ics1.el
@@ -98,7 +98,8 @@ PERSPECTIVE is t for white or nil for black."
   (interactive)
   (let ((pos (or position (chess-engine-position nil))))
     (with-current-buffer (get-buffer-create "*scratch*")
-      (chess-ics1-draw pos t))))
+      (chess-ics1-draw pos t)
+      (funcall chess-ics1-popup-function))))
 
 (provide 'chess-ics1)
 
-- 
cgit v1.2.3