diff options
| author | Eli Zaretskii | 2000-05-02 11:55:50 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2000-05-02 11:55:50 +0000 |
| commit | d9c0a50ef0270df73e5c805ee459eada5912e2ca (patch) | |
| tree | a06b928b0c563d75c4b28a6b9b85233c09209f02 | |
| parent | fd72561d60188ab9d889064d753975f34caf6b2e (diff) | |
| download | emacs-d9c0a50ef0270df73e5c805ee459eada5912e2ca.tar.gz emacs-d9c0a50ef0270df73e5c805ee459eada5912e2ca.zip | |
(set-language-environment): Don't
concat an integer (dos-codepage), use format instead.
| -rw-r--r-- | lisp/international/mule-cmds.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 7aed2f96793..ad0a29c25e0 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -1284,7 +1284,7 @@ specifies the character set for the major languages of Western Europe." | |||
| 1284 | (dos-table | 1284 | (dos-table |
| 1285 | (if (eq window-system 'pc) | 1285 | (if (eq window-system 'pc) |
| 1286 | (intern | 1286 | (intern |
| 1287 | (concat "cp" dos-codepage "-nonascii-translation-table"))))) | 1287 | (format "cp%d-nonascii-translation-table" dos-codepage))))) |
| 1288 | (cond | 1288 | (cond |
| 1289 | ((char-table-p nonascii) | 1289 | ((char-table-p nonascii) |
| 1290 | (setq nonascii-translation-table nonascii)) | 1290 | (setq nonascii-translation-table nonascii)) |