Clean up the mode line a bit

This commit is contained in:
Jesse Braham 2025-02-15 09:52:28 +01:00
parent 38c0f134c0
commit 4e06e20b89
3 changed files with 9 additions and 1 deletions

View File

@ -49,6 +49,12 @@
) )
;; Diminish some built-in modes that we don't really care about:
(add-hook 'eldoc-mode-hook (lambda () (diminish 'eldoc-mode)))
(add-hook 'hs-minor-mode-hook (lambda () (diminish 'hs-minor-mode)))
;; Load all user-defined configuration files: ;; Load all user-defined configuration files:
(load-user-file "editor.el") (load-user-file "editor.el")

View File

@ -19,6 +19,9 @@
scroll-margin 0 scroll-margin 0
scroll-preserve-screen-position 1) scroll-preserve-screen-position 1)
;; Hide the frame identifier in the mode line.
(setq mode-line-frame-identification " ")
;; Display the column and line numbers of the cursor in the mode line. ;; Display the column and line numbers of the cursor in the mode line.
(column-number-mode) (column-number-mode)

View File

@ -10,6 +10,5 @@
;; Enable code folding in programming modes, and set some more reasonable ;; Enable code folding in programming modes, and set some more reasonable
;; shortcuts. ;; shortcuts.
(add-hook 'prog-mode-hook #'hs-minor-mode) (add-hook 'prog-mode-hook #'hs-minor-mode)
(add-hook 'hs-minor-mode-hook (lambda () (diminish 'hs-minor-mode)))
(global-set-key (kbd "C-c C-h") (kbd "C-c @ C-h")) ; Hide a block (global-set-key (kbd "C-c C-h") (kbd "C-c @ C-h")) ; Hide a block
(global-set-key (kbd "C-c C-s") (kbd "C-c @ C-s")) ; Show a block (global-set-key (kbd "C-c C-s") (kbd "C-c @ C-s")) ; Show a block