refactor: page-break-lines-mode

seagle0128 · Jul 25, 2024 · 6ff53dd · 6ff53dd
1 parent f6b76c1
commit 6ff53dd
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 7 deletions.
diff --git a/lisp/init-dashboard.el b/lisp/init-dashboard.el
@@ -75,12 +75,7 @@
  ("q" . quit-dashboard)
  ("h" . dashboard-hydra/body)
  ("?" . dashboard-hydra/body))
- :hook (dashboard-mode . (lambda ()
- ;; No title
- (setq-local frame-title-format nil)
- ;; Enable `page-break-lines-mode'
- (when (fboundp 'page-break-lines-mode)
- (page-break-lines-mode 1))))
+ :hook (dashboard-mode . (lambda () (setq-local frame-title-format nil)))
  :init
  (setq dashboard-banner-logo-title "CENTAUR EMACS - Enjoy Programming & Writing"
  dashboard-startup-banner (or centaur-logo 'official)

diff --git a/lisp/init-ui.el b/lisp/init-ui.el
@@ -352,7 +352,10 @@
 ;; Display ugly ^L page breaks as tidy horizontal lines
 (use-package page-break-lines
  :diminish
- :hook (after-init . global-page-break-lines-mode))
+ :hook (after-init . global-page-break-lines-mode)
+ :config
+ (add-to-list 'page-break-lines-modes 'dashboard-mode)
+ (add-to-list 'page-break-lines-modes 'emacs-news-mode))
 
 ;; Child frame
 (when (childframe-workable-p)