diff options
| author | John Wiegley <johnw@newartisans.com> | 2008-09-01 21:00:58 -0400 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2008-09-01 21:35:02 -0400 |
| commit | 9fda7da35a761c82922600d36a48ae626842f89c (patch) | |
| tree | a8e239fc7add8031fb25a03cfe08ab8fca6f3cd4 /chess-pgn.el | |
| parent | 752977bd8a60bd362e2c46920096a4b3bd244640 (diff) | |
Off by one error in string clipping of tag values.
Diffstat (limited to 'chess-pgn.el')
| -rw-r--r-- | chess-pgn.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/chess-pgn.el b/chess-pgn.el index 4ccdb64..5b1b977 100644 --- a/chess-pgn.el +++ b/chess-pgn.el @@ -98,7 +98,7 @@ Optionally use the supplied STRING instead of the current buffer." (while (looking-at "\\[\\(\\S-+\\)\\s-+\\(\".*?\"\\)\\][ \t\n\r]+") (chess-game-set-tag game (match-string-no-properties 1) (let ((str (match-string-no-properties 2))) - (substring str 0 (1- (length str))))) + (substring str 1 (1- (length str))))) (goto-char (match-end 0))) (let ((fen (chess-game-tag game "FEN"))) (if fen |