[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/chess 31a581b: * chess-pgn.el (chess-pgn-parse): Fix un
From: |
Stefan Monnier |
Subject: |
[elpa] externals/chess 31a581b: * chess-pgn.el (chess-pgn-parse): Fix unescaped character literal |
Date: |
Sun, 7 May 2017 22:56:24 -0400 (EDT) |
branch: externals/chess
commit 31a581b5ea280b40f5c475a6e24b360d89cb1d83
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* chess-pgn.el (chess-pgn-parse): Fix unescaped character literal
---
chess-pgn.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/chess-pgn.el b/chess-pgn.el
index b398abd..575e8fd 100644
--- a/chess-pgn.el
+++ b/chess-pgn.el
@@ -1,6 +1,6 @@
;;; chess-pgn.el --- Convert a chess game to/from Portable Game Notation (PGN)
-;; Copyright (C) 2002, 2004, 2008, 2014 Free Software Foundation, Inc.
+;; Copyright (C) 2002, 2004, 2008, 2014, 2017 Free Software Foundation, Inc.
;; Author: John Wiegley <address@hidden>
;; Maintainer: Mario Lang <address@hidden>
@@ -155,12 +155,12 @@ Optionally use the supplied STRING instead of the current
buffer."
(let ((game (chess-game-create)))
(chess-game-set-tags game nil)
(while (looking-at (rx
- ?[ (group (one-or-more (not (syntax whitespace))))
+ ?\[ (group (one-or-more (not (syntax whitespace))))
(one-or-more (syntax whitespace))
(syntax string-quote)
(group (*? not-newline))
(syntax string-quote)
- ?]
+ ?\]
(one-or-more (char ? ?\n ?\r ?\t))))
(chess-game-set-tag game (match-string-no-properties 1)
(match-string-no-properties 2))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/chess 31a581b: * chess-pgn.el (chess-pgn-parse): Fix unescaped character literal,
Stefan Monnier <=