diff options
| author | Kenichi Handa | 2003-12-29 07:50:35 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2003-12-29 07:50:35 +0000 |
| commit | 8e9e2c18da133e4cf821796e7d7997fa0d127d3a (patch) | |
| tree | 793a8461fab01865a582e9a4ac59466a15aa1fe6 | |
| parent | 137c0a677396644f54be99049289f26fcd18604f (diff) | |
| download | emacs-8e9e2c18da133e4cf821796e7d7997fa0d127d3a.tar.gz emacs-8e9e2c18da133e4cf821796e7d7997fa0d127d3a.zip | |
(set-locale-environment): Insert locale-translation-file-name in a
unibyte buffer.
| -rw-r--r-- | lisp/international/mule-cmds.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index d18f368ba01..3178ec3b2b0 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -2250,6 +2250,7 @@ See also `locale-charset-language-names', `locale-language-names', | |||
| 2250 | ;; using the translation file that many systems have. | 2250 | ;; using the translation file that many systems have. |
| 2251 | (when locale-translation-file-name | 2251 | (when locale-translation-file-name |
| 2252 | (with-temp-buffer | 2252 | (with-temp-buffer |
| 2253 | (set-buffer-multibyte nil) | ||
| 2253 | (insert-file-contents locale-translation-file-name) | 2254 | (insert-file-contents locale-translation-file-name) |
| 2254 | (when (re-search-forward | 2255 | (when (re-search-forward |
| 2255 | (concat "^" (regexp-quote locale) ":?[ \t]+") nil t) | 2256 | (concat "^" (regexp-quote locale) ":?[ \t]+") nil t) |