summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--config.org117
1 files changed, 114 insertions, 3 deletions
diff --git a/config.org b/config.org index 287da8b..e24c88c 100644 --- a/config.org +++ b/config.org
@@ -801,21 +801,132 @@ I was using company, but I think it might've been causing issues with ~awk-mode~
801 (nov-mode . visual-line-mode) 801 (nov-mode . visual-line-mode)
802 (nov-mode . visual-fill-column-mode)) 802 (nov-mode . visual-fill-column-mode))
803#+end_src 803#+end_src
804** Circe: IRC
805Commented for now while I figure out exactly what I want from IRC, et al.
806#+begin_src emacs-lisp
807 ;; (cuss auth-sources '("~/.authinfo"))
808
809 ;; (defun acdw/fetch-password (&rest params)
810 ;; (require 'auth-source)
811 ;; (let ((match (car (apply 'auth-source-search params))))
812 ;; (if match
813 ;; (let ((secret (plist-get match :secret)))
814 ;; (if (functionp secret)
815 ;; (funcall secret)
816 ;; secret))
817 ;; (error "Password not found for %S" params))))
818
819 ;; (defun acdw/nickserv-password (nick server)
820 ;; (acdw/fetch-password :login nick :machine server))
821
822 ;; (defun acdw/setup-lui ()
823 ;; (interactive)
824 ;; (setq right-margin-width 5)
825 ;; (setq fringes-outside-margins t)
826 ;; (setq word-wrap t)
827 ;; (setq wrap-prefix " ")
828 ;; (setf (cdr (assoc 'continuation fringe-indicator-alist)) nil))
829
830 ;; (defun acdw/circe-prompt ()
831 ;; (lui-set-prompt
832 ;; (concat (propertize (concat (buffer-name) ">")
833 ;; 'face 'circe-prompt-face)
834 ;; " ")))
835
836 ;; (use-package circe
837 ;; :init
838 ;; (defun acdw/setup-circe ()
839 ;; (whitespace-mode -1)
840 ;; (enable-lui-autopaste))
841 ;; :custom
842 ;; (circe-default-part-message "Peace out, cub scouts")
843 ;; (circe-default-quit-message "See You Space Cowpokes....")
844 ;; (circe-default-realname "Case")
845 ;; (circe-highlight-nick-type 'all)
846 ;; (circe-reduce-lurker-spam t)
847 ;; (circe-format-say "{nick:-15s}| {body}")
848 ;; (circe-format-self-say "{nick:-15s}> {body}")
849 ;; (circe-format-action " * {nick} {body}")
850 ;; (circe-format-message " *{nick}* {body}")
851 ;; (circe-format-message-action " * *{nick}* {body}")
852 ;; (circe-format-self-action " * {nick} {body}")
853 ;; (circe-use-cycle-completion t)
854 ;; (circe-channel-killed-confirmation nil)
855 ;; (circe-color-nicks-everywhere t)
856 ;; (circe-default-nick "acdw")
857 ;; (circe-default-user "acdw")
858 ;; (circe-server-auto-join-default-type :after-auth)
859 ;; (lui-time-stamp-position 'right-margin)
860 ;; (lui-fill-type nil)
861 ;; (lui-time-stamp-format "%H:%M")
862 ;; (lui-track-bar-behavior 'before-switch-to-buffer)
863 ;; (circe-network-options
864 ;; `(("Freenode"
865 ;; :tls t
866 ;; :host "irc.acdw.net"
867 ;; :port 16789
868 ;; :nick "acdw"
869 ;; :sasl-username "acdw"
870 ;; :sasl-password "freenode:purple-mountains-majesty"
871 ;; :channels ("#emacs"))
872 ;; ("Tilde.chat"
873 ;; :tls t
874 ;; :host "irc.acdw.net"
875 ;; :port 16789
876 ;; :nick "acdw"
877 ;; :sasl-username "acdw"
878 ;; :sasl-password "tilde.chat:purple-mountains-majesty"
879 ;; :channels ("#gemini" "#meta" "#team" "#bread"))))
880 ;; :custom-face
881 ;; (circe-highlight-nick-face ((t (:inherit bold))))
882 ;; (circe-originator-face ((t (:weight bold))))
883 ;; (circe-prompt-face ((t (:foreground "blue"))))
884 ;; (lui-time-stamp-face ((t (:foreground "#808080" :height 0.8))))
885 ;; :config
886 ;; (enable-lui-track-bar)
887 ;; (enable-circe-color-nicks)
888 ;; (enable-circe-display-images)
889 ;; :hook
890 ;; (circe-channel-mode . acdw/setup-circe)
891 ;; (circe-chat-mode . acdw/circe-prompt)
892 ;; (lui-mode . acdw/setup-lui))
893#+end_src
894** Elfeed: Feed reader
895Elfeed keeps freezing emacs. I'm commenting this for now.
896#+begin_src emacs-lisp
897 ;; (use-package elfeed
898 ;; :custom
899 ;; (elfeed-feeds
900 ;; '(("https://acdw.net/atom.xml" me)
901 ;; ("https://planet.emacslife.com/atom.xml" emacs programming blog)
902 ;; ("https://www.xkcd.com/rss.xml" comics)
903 ;; ("https://portal.mozz.us/gemini/breadpunk.club/~bakersdozen/gemlog/atom.xml" friends)
904 ;; ("https://kotobank.ch/~vaartis/rss.xml" friends)
905 ;; ("https://m455.casa/feed.rss" friends)
906 ;; ("https://eli.li/feed.rss" friends)
907 ;; ("http://len.falken.ink/" friends)
908 ;; ("https://cadence.moe/blog/atom.xml?limit=30" friends)
909 ;; ("https://benjaminwil.info/feed.xml" friends)
910 ;; ("https://www.5snb.club/rss.xml" friends)
911 ;; ("https://write.lain.faith/@/haskal/atom.xml" friends)
912 ;; ("https://p1k3.com/feed" friends)
913 ;; )))
914#+end_src
804* Machine-specific configurations 915* Machine-specific configurations
805#+begin_src emacs-lisp 916#+begin_src emacs-lisp
806 (use-package su 917 (use-package su
807 :when *acdw/at-home* 918 :when *acdw/at-home*
808 :config 919 :config
809 (su-mode 1)) 920 (su-mode 1))
810 921
811 (use-package trashed 922 (use-package trashed
812 :when *acdw/at-home* 923 :when *acdw/at-home*
813 :custom 924 :custom
814 (delete-by-moving-to-trash t)) 925 (delete-by-moving-to-trash t))
815 926
816 (use-package exec-path-from-shell 927 (use-package exec-path-from-shell
817 :when *acdw/at-home* 928 :when *acdw/at-home*
818 :demand 929 :demand
819 :config 930 :config
820 (exec-path-from-shell-initialize))) 931 (exec-path-from-shell-initialize))
821#+end_src 932#+end_src