changeset 22937:584b28b8de70

(command-line): Require whitespace delimiter when searching locale-translation-file-name.
author Richard M. Stallman <rms@gnu.org>
date Fri, 07 Aug 1998 23:25:43 +0000
parents 7ba8e024c38f
children a45f2afb8ed9
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Fri Aug 07 08:53:47 1998 +0000
+++ b/lisp/startup.el	Fri Aug 07 23:25:43 1998 +0000
@@ -509,7 +509,7 @@
 	 (file-exists-p locale-translation-file-name)
 	 (with-temp-buffer
 	   (insert-file-contents locale-translation-file-name)
-	   (if (re-search-forward (concat "^" ctype "[ \t]*") nil t)
+	   (if (re-search-forward (concat "^" ctype "[ \t]+") nil t)
 	       (setq ctype (buffer-substring (point)
 					     (progn (end-of-line) (point)))))))
     ;; Now see if the locale specifies an ISO 8859 character set.