Generate scratch buffer properly in terminal emacs
This commit is contained in:
parent
fdf5754de3
commit
bd58c34c02
1 changed files with 2 additions and 1 deletions
|
@ -217,7 +217,8 @@ enable multiple minor modes for the same regexp.")
|
||||||
(doom-mode)
|
(doom-mode)
|
||||||
(erase-buffer)
|
(erase-buffer)
|
||||||
(insert
|
(insert
|
||||||
(let* ((width (- (if auto-detect-frame (window-width) (cdr (assq 'width default-frame-alist))) 3))
|
(let* ((auto-detect-frame (or auto-detect-frame (not (display-graphic-p))))
|
||||||
|
(width (- (if auto-detect-frame (window-width) (cdr (assq 'width default-frame-alist))) 3))
|
||||||
(lead (make-string (truncate (/ (- width 78) 2)) ? )))
|
(lead (make-string (truncate (/ (- width 78) 2)) ? )))
|
||||||
(concat
|
(concat
|
||||||
(propertize
|
(propertize
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue