summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2008-09-02 06:13:34 -0400
committerJohn Wiegley <johnw@newartisans.com>2008-09-02 06:13:34 -0400
commitc9763c44faba8cfbcd29ac6dafcd83e64caf00e4 (patch)
treea81c6e7732363d464bd4a412f6e42c4f460273f1
parent1c0bd39bfc80265ae67f6683b20051cecf2dd78a (diff)
Added a code cleanup note.
-rw-r--r--chess-ics.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/chess-ics.el b/chess-ics.el
index 1cbdaa9..413dd6c 100644
--- a/chess-ics.el
+++ b/chess-ics.el
@@ -816,6 +816,7 @@ descending order.")
(goto-char here))))
(defun chess-ics-seeking (string)
+ ;; jww (2008-09-02): we should use rx for this regular expression also
(while (string-match
(concat "[\n\r]+\\(\\S-+\\) (\\([0-9+ -]+\\)) seeking \\([a-z]\\S-+ \\)?\\([0-9]+\\) \\([0-9]+\\) \\(\\(un\\)?rated\\) \\([^(]*\\)(\"\\([^\"]+\\)\" to respond)\\s-*[\n\r]+"
chess-ics-prompt-regexp)