diff options
| -rw-r--r-- | lisp/international/latin1-disp.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/international/latin1-disp.el b/lisp/international/latin1-disp.el index 368bd62a248..639457d8fdf 100644 --- a/lisp/international/latin1-disp.el +++ b/lisp/international/latin1-disp.el | |||
| @@ -171,7 +171,7 @@ character set: `latin-2', `hebrew' etc." | |||
| 171 | (if font-pattern | 171 | (if font-pattern |
| 172 | (progn | 172 | (progn |
| 173 | ;; Now FONT-PATTERN is a string or a cons of family | 173 | ;; Now FONT-PATTERN is a string or a cons of family |
| 174 | ;; field pattern and registry filed pattern. | 174 | ;; field pattern and registry field pattern. |
| 175 | (or (stringp font-pattern) | 175 | (or (stringp font-pattern) |
| 176 | (setq font-pattern (concat (or (car font-pattern) "*") | 176 | (setq font-pattern (concat (or (car font-pattern) "*") |
| 177 | "-*-" | 177 | "-*-" |
| @@ -272,7 +272,8 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 272 | '((?ƒ¡ "/H") | 272 | '((?ƒ¡ "/H") |
| 273 | (?Ģ "~`" "'(") | 273 | (?Ģ "~`" "'(") |
| 274 | (?ƒ¦ "^H" "H^") | 274 | (?ƒ¦ "^H" "H^") |
| 275 | (?Ħ "^h" "h^") (?ĩ ".I" "I^.") | 275 | (?Ħ "^h" "h^") |
| 276 | (?ĩ ".I" "I^.") | ||
| 276 | (?Ļ ",S") | 277 | (?Ļ ",S") |
| 277 | (?ƒ« "~G" "G(") | 278 | (?ƒ« "~G" "G(") |
| 278 | (?ƒ¬ "^J" "J^") | 279 | (?ƒ¬ "^J" "J^") |