diff options
| author | Eli Zaretskii | 2022-08-28 14:42:07 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2022-08-28 14:42:07 +0300 |
| commit | d111b5b6512e1c8e932572906e2f516832e6c408 (patch) | |
| tree | bdb8145ebe75a5c583576766b86874eaeba1846e | |
| parent | cc945ec0ed11c93a322db6258d47ea2746aead18 (diff) | |
| download | emacs-d111b5b6512e1c8e932572906e2f516832e6c408.tar.gz emacs-d111b5b6512e1c8e932572906e2f516832e6c408.zip | |
* lisp/info.el (Info-mode): Support the Linux console better.
| -rw-r--r-- | lisp/info.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/info.el b/lisp/info.el index 739116cceac..5655e3f3ce9 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -4446,9 +4446,12 @@ Advanced commands: | |||
| 4446 | (setq buffer-read-only t) | 4446 | (setq buffer-read-only t) |
| 4447 | (setq Info-tag-table-marker (make-marker)) | 4447 | (setq Info-tag-table-marker (make-marker)) |
| 4448 | (unless (or (display-multi-font-p) | 4448 | (unless (or (display-multi-font-p) |
| 4449 | (coding-system-equal | 4449 | (and (coding-system-equal |
| 4450 | (coding-system-base (terminal-coding-system)) | 4450 | (coding-system-base (terminal-coding-system)) |
| 4451 | 'utf-8)) | 4451 | 'utf-8) |
| 4452 | ;; The Linux console has limited character | ||
| 4453 | ;; repertoire even when its encoding is UTF-8. | ||
| 4454 | (not (equal (tty-type) "linux")))) | ||
| 4452 | (dolist (elt info-symbols-and-replacements) | 4455 | (dolist (elt info-symbols-and-replacements) |
| 4453 | (let ((ch (car elt)) | 4456 | (let ((ch (car elt)) |
| 4454 | (repl (cdr elt))) | 4457 | (repl (cdr elt))) |