diff options
Diffstat (limited to '.config/emacs/init.el')
| -rw-r--r-- | .config/emacs/init.el | 48 |
1 files changed, 2 insertions, 46 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el index 762e5b1..778443f 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -5,31 +5,12 @@ ;; each 50MB of allocated data (the default is on every 0.76MB) (setopt gc-cons-threshold 50000000) -(load (expand-file-name "$HOME/.config/emacs/bd-essential.el")) - -(defun request-sudo () - "Uses TRAMP to edit currently opened file as root." - (interactive) - (when buffer-file-name - (find-alternate-file - (concat "/sudo:root@localhost:" - buffer-file-name)))) +(load (expand-file-name "$HOME/.config/emacs/bd-default.el")) (defun match-buffer-name (name) "Returns non-nil if NAME matches the name of an existing buffer" (try-completion name (mapcar #'buffer-name (buffer-list)))) -(defun rip-video () - "If region, open SEARCH with mpv in --full-screen. Else, -open URL at point." - (interactive) - (let ((URL-OR-SEARCH - (if (use-region-p) - (buffer-substring (mark) (point)) - (shr-url-at-point nil)))) - (message "Ludu %s" URL-OR-SEARCH) - (start-process-shell-command "rip-video" nil (concat "rip-video " URL-OR-SEARCH)))) - (defun clamp (lower-bound upper-bound value) (max lower-bound (min value upper-bound))) @@ -37,36 +18,11 @@ open URL at point." (load (expand-file-name "$HOME/.config/emacs/bd-emms.el")) (load (expand-file-name "$HOME/.config/emacs/bd-development.el")) -(use-package newsticker - :demand t - :bind (("C-z C-n" . newsticker-show-news) - :map newsticker-treeview-item-mode-map - ("C-j" . rip-video)) - :custom - (newsticker-url-list-defaults nil) - (newsticker-automatically-mark-items-as-old nil) - (newsticker-url-list '(("Ambrose and Elsewhere" "https://jamesenge.com/engeblog/feed" nil nil nil) - ("James Enge Mastodon" "https://mastodon.sdf.org/@jamesenge.rss" nil nil nil) - ("Book Reviews | Tales From the Magician's Skull" "https://goodman-games.com/tftms/category/book-reviews/feed" nil nil nil) - ("Arch Linux: Recent news updates" "https://archlinux.org/feeds/news/" nil nil nil) - ("Parabola GNU/Linux-libre: Recent news updates" "https://www.parabola.nu/feeds/news/" nil nil nil) - ("suckless.org news" "https://suckless.org/atom.xml" nil nil nil) - ("Mental Outlaw" "https://vid.puffyan.us/feed/channel/UC7YOGHUfC1Tb6E4pudI9STA" nil nil nil) - ("Luke Smith" "https://vid.puffyan.us/feed/channel/UC2eYFnH61tmytImy1mTYvhA" nil nil nil) - ("Brent Westbrook" "https://yewtu.be/feed/channel/UC0PBefyEK7qQ7HN325nUamQ" nil nil nil) - ("Bugswriter" "https://yewtu.be/feed/channel/UCngn7SVujlvskHRvRKc1cTw" nil nil nil) - ("Protesilaos Stravrou" "https://yewtu.be/feed/playlist/PL8Bwba5vnQK14z96Gil86pLMDO2GnOhQ6" nil nil nil))) - ;; may require ./newsticker/groups to be cleared - (newsticker-groups '("Feeds" - ("READING" "Ambrose and Elsewhere" "James Enge Mastodon" "Book Reviews | Tales From the Magician's Skull") - ("TECH" ("GNU/Linux" "Arch Linux: Recent news updates" "Parabola GNU/Linux-libre: Recent news updates") "suckless.org news") - ("VIDEO" "Mental Outlaw" "Luke Smith" "Brent Westbrook" "Bugswriter" "Protesilaos Stravrou")))) - (setopt erc-server "irc.libera.chat" erc-nick "Isaz" erc-user-full-name "bd" erc-kill-buffer-on-part t - erc-autojoin-channels-alist '(("irc.libera.char" "#parabola" "#emacs"))) + erc-autojoin-channels-alist '(("irc.libera.chat" "#parabola" "#emacs"))) (defalias 'erc 'erc-tls) ;; dired |