diff options
Diffstat (limited to 'lisp/disp-table.el')
| -rw-r--r-- | lisp/disp-table.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/disp-table.el b/lisp/disp-table.el index 543364867eb..201e4d6ce89 100644 --- a/lisp/disp-table.el +++ b/lisp/disp-table.el @@ -75,7 +75,7 @@ Valid symbols are `truncation', `wrap', `escape', `control', ;;;###autoload (defun describe-display-table (dt) "Describe the display table DT in a help buffer." - (with-output-to-temp-buffer "*Help*" + (with-help-window "*Help*" (princ "\nTruncation glyph: ") (prin1 (display-table-slot dt 'truncation)) (princ "\nWrap glyph: ") @@ -97,8 +97,7 @@ Valid symbols are `truncation', `wrap', `escape', `control', (aset vector i (aref dt i)) (setq i (1+ i))) (describe-vector vector)) - (help-mode)) - (print-help-return-message))) + (help-mode)))) ;;;###autoload (defun describe-current-display-table () |