From d33156db3228d6fc470b9dd71ee37bc8ad0e707c Mon Sep 17 00:00:00 2001 From: Mario Lang Date: Fri, 9 Jan 2004 08:01:40 +0000 Subject: use zerop --- chess-gnuchess.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'chess-gnuchess.el') diff --git a/chess-gnuchess.el b/chess-gnuchess.el index e6a9c37..591c78f 100644 --- a/chess-gnuchess.el +++ b/chess-gnuchess.el @@ -55,7 +55,7 @@ (chess-engine-send nil (format "epdload %s\n" file)))) ((eq event 'setup-game) - (if (= 0 (chess-game-index (car args))) + (if (zerop (chess-game-index (car args))) (chess-gnuchess-handler game 'setup-pos (chess-game-pos game 0)) (let ((file (chess-with-temp-file (insert (chess-game-to-string (car args)) ?\n)))) -- cgit v1.2.3