lucas/dotfiles
1
0
Fork 0
Code Activity

fix(emacs): make org variable-pitch and tune display-line-numbers

Browse source 
Signed-off-by: Lucas Sta Maria <lucas@priime.dev>
This commit is contained in:
Lucas Sta Maria 2024-11-03 19:04:17 -05:00
parent 54f5683b3b
commit 7e2050e1d2
No known key found for this signature in database
GPG key ID: F07FB16A826E3B47
2 changed files with 18 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

24
.emacs.d/include/priime-general.el
View file

@ -61,16 +61,22 @@
(let ((amt (or arg 1)))
(scroll-right amt)))
(defun priime-display-relative ()
"Display relative line numbers."
(display-line-numbers-mode 1)
(setq display-line-numbers 'relative))
(defun priime-display-fixed ()
"Display fixed line numbers."
(display-line-numbers-mode 1)
(setq display-line-numbers t))
(defun priime-toggle-line-numbers ()
"Toggle the display of line numbers."
(interactive)
(cond ((equal display-line-numbers t)
(setq display-line-numbers 'relative))
((equal display-line-numbers 'relative)
(setq display-line-numbers t))
(t
(display-line-numbers-mode 1)
(setq display-line-numbers t))))
(cond ((equal display-line-numbers t) (priime-display-relative))
((equal display-line-numbers 'relative) (priime-display-fixed))
(t (priime-display-fixed))))
(defun download-file (&optional url filepath)
"Download the file from URL to FILEPATH."
@ -105,7 +111,6 @@
(visible-bell nil)
(ring-bell-function 'ignore)
(initial-scratch-message nil)
(display-line-numbers 'relative)
(split-height-threshold
(cond ((string= (system-name) "framework") 100)
(t 80)))
@ -145,6 +150,9 @@
(("C-v" . View-scroll-half-page-forward)
("M-v" . View-scroll-half-page-backward))
:hook
((prog-mode . priime-display-relative))
:init
(menu-bar-mode -1)
(tool-bar-mode -1)