diff options
author | Case Duckworth | 2021-04-21 09:38:27 -0500 |
---|---|---|
committer | Case Duckworth | 2021-04-21 09:38:27 -0500 |
commit | 71d2664f23e5c7b0bf7e8b70e1398e866e77adfb (patch) | |
tree | 3ce3dc70846e18c209018221647abcafbb9ab416 | |
parent | Fix typo (diff) | |
parent | Merge branch 'main' of https://tildegit.org/acdw/emacs (diff) | |
download | emacs-71d2664f23e5c7b0bf7e8b70e1398e866e77adfb.tar.gz emacs-71d2664f23e5c7b0bf7e8b70e1398e866e77adfb.zip |
Merge branch 'main' of https://tildegit.org/acdw/emacs
-rw-r--r-- | init.el | 6 | ||||
-rw-r--r-- | lisp/acdw-org.el | 2 |
2 files changed, 6 insertions, 2 deletions
diff --git a/init.el b/init.el index f728603..c2d4b2b 100644 --- a/init.el +++ b/init.el | |||
@@ -554,7 +554,6 @@ | |||
554 | (:global "C-=" er/expand-region)) | 554 | (:global "C-=" er/expand-region)) |
555 | 555 | ||
556 | (setup (:straight crux) | 556 | (setup (:straight crux) |
557 | (advice-add 'kill-line :override #'crux-kill-and-join-forward) | ||
558 | (:global "M-`" crux-other-window-or-switch-buffer | 557 | (:global "M-`" crux-other-window-or-switch-buffer |
559 | "C-o" crux-smart-open-line | 558 | "C-o" crux-smart-open-line |
560 | "M-o" crux-smart-open-line-above | 559 | "M-o" crux-smart-open-line-above |
@@ -777,6 +776,11 @@ if ripgrep is installed, otherwise `consult-grep'." | |||
777 | (setup (:straight flyspell-correct) | 776 | (setup (:straight flyspell-correct) |
778 | (define-key flyspell-mode-map (kbd "C-;") #'flyspell-correct-wrapper))) | 777 | (define-key flyspell-mode-map (kbd "C-;") #'flyspell-correct-wrapper))) |
779 | 778 | ||
779 | (setup (:straight (electric-cursor | ||
780 | :host github | ||
781 | :repo "duckwork/electric-cursor")) | ||
782 | (electric-cursor-mode +1)) | ||
783 | |||
780 | 784 | ||
781 | ;;; Programming | 785 | ;;; Programming |
782 | 786 | ||
diff --git a/lisp/acdw-org.el b/lisp/acdw-org.el index dfabcc7..13a1b88 100644 --- a/lisp/acdw-org.el +++ b/lisp/acdw-org.el | |||
@@ -170,7 +170,7 @@ appropriate. In tables, insert a new row or end the table." | |||
170 | nil | 170 | nil |
171 | 'tree))) | 171 | 'tree))) |
172 | 172 | ||
173 | (defun acdw-org/fix-blanks-in-buffer () | 173 | (defun acdw-org/fix-blank-lines-in-buffer () |
174 | (when (eq major-mode 'org-mode) | 174 | (when (eq major-mode 'org-mode) |
175 | (let ((current-prefix-arg 4)) | 175 | (let ((current-prefix-arg 4)) |
176 | (call-interactively #'acdw-org/fix-blank-lines)))) | 176 | (call-interactively #'acdw-org/fix-blank-lines)))) |