aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJason Rumney2003-09-01 21:35:48 +0000
committerJason Rumney2003-09-01 21:35:48 +0000
commit86e7801e0ed07b63a8ae257193147ad293105e64 (patch)
tree21a6895b9a62ca55b45b7ca00d97181da2fa660f
parent4a29bad2d03fcc3d648d03f3759600df212d383f (diff)
downloademacs-86e7801e0ed07b63a8ae257193147ad293105e64.tar.gz
emacs-86e7801e0ed07b63a8ae257193147ad293105e64.zip
(tit-read-key-value): Include \r in regexp.
-rw-r--r--lisp/international/titdic-cnv.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/titdic-cnv.el b/lisp/international/titdic-cnv.el
index 162c84da301..118fe2c2494 100644
--- a/lisp/international/titdic-cnv.el
+++ b/lisp/international/titdic-cnv.el
@@ -206,7 +206,7 @@ SPC, 6, 3, 4, or 7 specifing a tone (SPC:$(0?v(N(B, 6:$(0Dm(N(B, 3:$(0&9Vy
206 206
207;; Return a value of the key in the current line. 207;; Return a value of the key in the current line.
208(defsubst tit-read-key-value () 208(defsubst tit-read-key-value ()
209 (if (looking-at "[^ \t\n]+") 209 (if (looking-at "[^ \t\r\n]+")
210 (car (read-from-string (concat "\"" (match-string 0) "\""))))) 210 (car (read-from-string (concat "\"" (match-string 0) "\"")))))
211 211
212;; Return an appropriate quail-package filename from FILENAME (TIT 212;; Return an appropriate quail-package filename from FILENAME (TIT