changeset 52408:0fda57976189

(tit-read-key-value): Include \r in regexp.
author Jason Rumney <jasonr@gnu.org>
date Mon, 01 Sep 2003 21:35:48 +0000
parents ad9565f86518
children 299ed1c68370
files lisp/international/titdic-cnv.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/titdic-cnv.el	Mon Sep 01 18:51:17 2003 +0000
+++ b/lisp/international/titdic-cnv.el	Mon Sep 01 21:35:48 2003 +0000
@@ -206,7 +206,7 @@
 
 ;; Return a value of the key in the current line.
 (defsubst tit-read-key-value ()
-  (if (looking-at "[^ \t\n]+")
+  (if (looking-at "[^ \t\r\n]+")
       (car (read-from-string (concat "\"" (match-string 0) "\"")))))
 
 ;; Return an appropriate quail-package filename from FILENAME (TIT