From 62c13bcfa1933274be856ac5840a933bbaca5f27 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 22 Apr 2002 19:23:45 +0000 Subject: Bug fixes and reducing the TODO list. --- chess-images.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'chess-images.el') diff --git a/chess-images.el b/chess-images.el index 60d02d7..5ffa01d 100644 --- a/chess-images.el +++ b/chess-images.el @@ -182,7 +182,13 @@ called." (apply 'chess-images-draw-square args)) ((eq event 'highlight) - (apply 'chess-images-highlight args)))) + (apply 'chess-images-highlight args)) + + ((eq event 'start-edit) + (setq cursor-type t)) + + ((eq event 'end-edit) + (setq cursor-type nil)))) (defun chess-images-determine-size () (let ((display (and (stringp chess-images-separate-frame) -- cgit v1.2.3