From 765c3b75dd99a58485a0fa4e8d1117fc7d456ca3 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:16:32 -0500 Subject: Add pixelfed to non-eww sites --- init.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'init.el') diff --git a/init.el b/init.el index 9fbc245..445b360 100644 --- a/init.el +++ b/init.el @@ -170,7 +170,8 @@ AKA, DO NOT USE THIS FUNCTION!!!" (cons (rx (or "google.com" ; websites that don't work with eww "reddit.com" "twitter.com" - "imgur.com")) + "imgur.com" + "pixelfed")) browse-url-secondary-browser-function) (cons "." ; everything else #'eww-browse-url))) -- cgit 1.4.1-21-gabe81 From fc131097741c0a66ec2818b7a468d00f4bd23193 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:16:48 -0500 Subject: Add pissnet --- init.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'init.el') diff --git a/init.el b/init.el index 445b360..70d72b4 100644 --- a/init.el +++ b/init.el @@ -234,6 +234,11 @@ AKA, DO NOT USE THIS FUNCTION!!!" :sasl-username ,circe-default-nick :sasl-password ,(acdw/make-password-fetcher :host "m455.casa")) + ("Pissnet" :host "piss.hmm.st" :port 6697 :use-tls t + :channels ("#i-just-peed") + :sasl-username ,circe-default-nick + :sasl-password ,(acdw/make-password-fetcher + :host "piss.hmm.st")) ;; TODO: irc.chat.twitch.tv ) circe-reduce-lurker-spam t -- cgit 1.4.1-21-gabe81 From 3d0addef2cde8b20d0844771a8acf89505174e88 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:17:03 -0500 Subject: Set consult-preview key --- init.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'init.el') diff --git a/init.el b/init.el index 70d72b4..e7f08d5 100644 --- a/init.el +++ b/init.el @@ -271,6 +271,7 @@ AKA, DO NOT USE THIS FUNCTION!!!" (defun circe-command-SHORTEN (url) "Shorten URL using `0x0-shorten-uri'." (interactive "sURL to shorten: ") + ;; TODO: enable /shorten URL comment syntax (let ((short-url (0x0-shorten-uri (0x0--choose-server) url))) (circe-command-SAY short-url))) @@ -386,6 +387,7 @@ AKA, DO NOT USE THIS FUNCTION!!!" consult-project-root-function #'vc-root-dir completion-in-region-function #'acdw-consult/complete-in-region completion-cycle-threshold 3 + consult-preview-key (kbd "M-.") tab-always-indent 'complete) (:advise register-preview :override #'consult-register-window) @@ -467,8 +469,8 @@ AKA, DO NOT USE THIS FUNCTION!!!" (:hook visual-line-mode)) (setup (:straight-if (define-repeat-map - :host nil - :repo "https://tildegit.org/acdw/define-repeat-map.el") + :host nil + :repo "https://tildegit.org/acdw/define-repeat-map.el") (acdw/system :home)) (defun acdw/other-window-or-switch-buffer-backward () -- cgit 1.4.1-21-gabe81 From 129017b94812a05b67a2ec1631df21f45086ac3a Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:17:16 -0500 Subject: Change tilderadio url --- init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'init.el') diff --git a/init.el b/init.el index e7f08d5..8fb3817 100644 --- a/init.el +++ b/init.el @@ -870,7 +870,7 @@ AKA, DO NOT USE THIS FUNCTION!!!" ("BadRadio: 24/7 PHONK" . "https://s2.radio.co/s2b2b68744/listen") ("tilderadio" . - "https://radio.tildeverse.org/radio/8000/radio.ogg") + "https://azuracast.tilderadio.org/radio/8000/radio.ogg") ("vantaradio" . "https://vantaa.black/radio"))) (:global "C-c r r" #'eradio-play ; mnemonic: radio -- cgit 1.4.1-21-gabe81 From 73d8c80feb5dc388ef42579dd47bb1dd7e7693c1 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:17:29 -0500 Subject: Customize flyspell-correct --- init.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'init.el') diff --git a/init.el b/init.el index 8fb3817..f3ec817 100644 --- a/init.el +++ b/init.el @@ -1029,6 +1029,8 @@ specific to most general, they are these: (:hook-into text-mode)) (setup (:straight flyspell-correct) + (:option flyspell-correct-interface #'flyspell-correct-completing-read + flyspell-correct--cr-key "`") (:with-feature flyspell (:hook (defun flyspell@correct () (:bind "C-;" #'flyspell-correct-wrapper) -- cgit 1.4.1-21-gabe81 From c8d5ec55a897d0b4fcc57e9f055ad0426f0c579c Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:17:41 -0500 Subject: Only enable forge at home --- init.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'init.el') diff --git a/init.el b/init.el index f3ec817..cb24a7a 100644 --- a/init.el +++ b/init.el @@ -1036,7 +1036,8 @@ specific to most general, they are these: (:bind "C-;" #'flyspell-correct-wrapper) (:unbind "C-," "C-." "C-M-i"))))) -(setup (:straight forge) +(setup (:straight-if forge + (acdw/system :home)) ;; make sure to read Info manual with Forge (and Ghub) for setup ;; instructions. (with-eval-after-load 'magit -- cgit 1.4.1-21-gabe81 From f77cbbbf51d412f3829819207de54657d7a14c21 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:17:51 -0500 Subject: Unbind C-' from org-mode to open global map --- init.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'init.el') diff --git a/init.el b/init.el index cb24a7a..754d012 100644 --- a/init.el +++ b/init.el @@ -1504,6 +1504,8 @@ browser defined in `browse-url-secondary-browser-function'." "C-c C-n" #'acdw/org-next-heading-widen "C-c C-p" #'acdw/org-previous-heading-widen) + (:unbind "C-'") + (with-eval-after-load 'org-export (:option (append org-export-filter-final-output-functions) #'org-export-remove-zero-width-spaces)) -- cgit 1.4.1-21-gabe81 From 94069768e59c13992e7f915018c13d25f9605438 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 13 Sep 2021 17:18:07 -0500 Subject: Install prism Trying this out ... --- init.el | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'init.el') diff --git a/init.el b/init.el index 754d012..2e982df 100644 --- a/init.el +++ b/init.el @@ -1617,6 +1617,10 @@ browser defined in `browse-url-secondary-browser-function'." (setup (:straight powerthesaurus) (:global "C-c l t" #'powerthesaurus-lookup-word-dwim)) +(setup (:straight prism) + (:hook-into lisp-mode + c-mode)) + (setup prog (:option show-paren-delay 0 show-paren-style 'mixed -- cgit 1.4.1-21-gabe81