diff options
Diffstat (limited to 'chess-algebraic.el')
| -rw-r--r-- | chess-algebraic.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/chess-algebraic.el b/chess-algebraic.el index b7038cd..7aebdf3 100644 --- a/chess-algebraic.el +++ b/chess-algebraic.el @@ -73,7 +73,7 @@ This regexp handles both long and short form.") (setq source (aref source 0))) (let (candidates which) (unless (< piece ?a) - (setq piece ?P)) + (setq source piece piece ?P)) ;; we must use our knowledge of how pieces can ;; move, to determine which piece is meant by the ;; piece indicator |