diff options
| -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 |