summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormattkae <mattkae@protonmail.com>2023-05-07 09:23:16 -0400
committermattkae <mattkae@protonmail.com>2023-05-07 09:23:16 -0400
commit1fab3900c5abc32bbf96ce88a7dab231b4b4c2e3 (patch)
treebc401124ef59ac250c91aaa890eeafe4b20067b5
parentde90342ba536efc697a6a9ce7a96a42cfceea768 (diff)
No longer inhibiting splash screen and just highllighting the beginning to end of lines
-rw-r--r--images/true.pngbin0 -> 24692 bytes
-rw-r--r--lisp/general.el13
2 files changed, 10 insertions, 3 deletions
diff --git a/images/true.png b/images/true.png
new file mode 100644
index 0000000..bd56505
--- /dev/null
+++ b/images/true.png
Binary files differ
diff --git a/lisp/general.el b/lisp/general.el
index a48cf7c..b6db8b7 100644
--- a/lisp/general.el
+++ b/lisp/general.el
@@ -73,9 +73,8 @@
(setq-default right-fringe-width 20)
;; Initialization screen
-(setq inhibit-splash-screen t)
-(setq initial-scratch-message "* Scratch")
-(setq initial-major-mode 'org-mode)
+(setq fancy-splash-image "~/.emacs.d/images/true.png")
+
;; Highlight todos
(use-package hl-todo
@@ -150,6 +149,14 @@
:box '(:line-width -1
:color "gray90"
:style nil))
+(defun visual-line-range ()
+ """Purpose is to only highlight the visual line even when the real line wraps. (Source: https://stackoverflow.com/questions/31541907/highlight-a-single-line-in-a-larger-word-wrapped-line)"""
+ (save-excursion
+ (cons
+ (progn (beginning-of-visual-line) (point))
+ (progn (end-of-visual-line) (point)))))
+
+(setq hl-line-range-function 'visual-line-range)
;; Git