From 62425d4d94f95572c985005c33d93fe9ae420ac9 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 8 Apr 2002 06:42:12 +0000 Subject: Added support for playing out puzzle collections. --- chess-fen.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'chess-fen.el') diff --git a/chess-fen.el b/chess-fen.el index 8ef7ccb..8dca4f6 100644 --- a/chess-fen.el +++ b/chess-fen.el @@ -84,7 +84,7 @@ If FULL is non-nil, represent trailing spaces as well." (if (= p ? ) (setq blank (1+ blank)) (if (> blank 0) - (setq blank 0 str (concat str (int-to-string blank)))) + (setq str (concat str (int-to-string blank)) blank 0)) (setq str (concat str (char-to-string p)))))) (if (and full (> blank 0)) (setq str (concat str (int-to-string blank)))) -- cgit v1.2.3