From 18f22844af74b15732d7fc7dfad318a1ba0c0d99 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Tue, 9 Apr 2002 01:28:37 +0000 Subject: *** no comment *** --- chess-engine.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'chess-engine.el') diff --git a/chess-engine.el b/chess-engine.el index ad163c0..807f99d 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -222,8 +222,10 @@ ;; this could be accelerated by joining ;; together the regexps (if (looking-at (caar triggers)) - (funcall (cdar triggers))) - (setq triggers (cdr triggers)))) + (progn + (funcall (cdar triggers)) + (setq triggers nil)) + (setq triggers (cdr triggers))))) (chess-illegal (error-message-string err))) (forward-line))) (setq chess-engine-last-pos (point) -- cgit v1.2.3