From dbe183e62fb118820283919bf7e7171142cdfeb9 Mon Sep 17 00:00:00 2001 From: Mario Lang Date: Fri, 9 Jan 2004 07:43:40 +0000 Subject: use `chess-var-to-algebraic'. --- chess-epd.el | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/chess-epd.el b/chess-epd.el index 4b31425..294f0a0 100644 --- a/chess-epd.el +++ b/chess-epd.el @@ -3,7 +3,6 @@ ;; Copyright (C) 2004 Free Software Foundation, Inc. ;; Author: Mario Lang -;; Keywords: ;; This file is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by @@ -39,10 +38,7 @@ (format "%S %d;" opcode value)) ((eq opcode 'pv) (format "%S %s;" - opcode (mapconcat #'chess-ply-to-string - (reverse (cdr - (reverse (chess-var-plies value)))) - " "))) + opcode (chess-var-to-algebraic value))) (t (format "%S%s;" opcode (if (eq value t) "" (format " %s" value))))))) -- cgit v1.2.3