summaryrefslogtreecommitdiff
path: root/chess-algebraic.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-04-09 10:35:48 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-04-09 10:35:48 +0000
commiteb5e0a5dddb2a4f98efeb5adfeeefef5961e5545 (patch)
tree32be96cb8f16b3ca75bdafa1f3a468a265d71ae1 /chess-algebraic.el
parente72de811ab1334214dd80a01951cc99db83c2dbb (diff)
*** no comment ***
Diffstat (limited to 'chess-algebraic.el')
-rw-r--r--chess-algebraic.el2
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