Update emacs.org

This commit is contained in:
Sakooooo 2023-12-15 21:34:18 +04:00 committed by GitHub
parent 5f154f0584
commit 60e90bb836
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -1213,48 +1213,49 @@ Dired is a built-in file manager for Emacs that does some pretty amazing things!
#+end_src #+end_src
** RSS Reader ** RSS Reader
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package elfeed (use-package elfeed
:straight t :straight t
) )
(use-package elfeed-protocol (use-package elfeed-protocol
:straight t :straight t
:after elfeed :after elfeed
:ensure t :ensure t
:config :config
;; curl recommend ;; curl recommend
(setq elfeed-use-curl t) ;; crashes emacs
(elfeed-set-timeout 36000) ;; (setq elfeed-use-curl t)
(setq elfeed-curl-extra-arguments '("--insecure")) ;necessary for https without a trust certificate (elfeed-set-timeout 36000)
(setq elfeed-curl-extra-arguments '("--insecure")) ;necessary for https without a trust certificate
;; workaround for smth ;; workaround for smth
(setq elfeed-protocol-fever-update-unread-only t) (setq elfeed-protocol-fever-update-unread-only t)
;; setup feeds ;; setup feeds
(setq elfeed-protocol-feeds '(("fever+https://sako@rss.sako.box" (setq elfeed-protocol-feeds '(("fever+https://sako@rss.sako.box"
:api-url "https://rss.sako.box/api/fever.php" :api-url "https://rss.sako.box/api/fever.php"
:use-authinfo t))) :use-authinfo t)))
;; enable elfeed-protocol ;; enable elfeed-protocol
(setq elfeed-protocol-enabled-protocols '(fever newsblur owncloud ttrss)) (setq elfeed-protocol-enabled-protocols '(fever newsblur owncloud ttrss))
(elfeed-protocol-enable) (elfeed-protocol-enable)
) )
(let* ((proto-id "fever+https://sako@rss.sako.box") (let* ((proto-id "fever+https://sako@rss.sako.box")
(last-id (elfeed-protocol-fever-get-update-mark proto-id 'update))) (last-id (elfeed-protocol-fever-get-update-mark proto-id 'update)))
(elfeed-protocol-fever-set-update-mark proto-id 'update (- last-id 1000))) (elfeed-protocol-fever-set-update-mark proto-id 'update (- last-id 1000)))
(run-at-time 300 300 (run-at-time 300 300
(lambda () (when (= elfeed-curl-queue-active 0) (lambda () (when (= elfeed-curl-queue-active 0)
(elfeed-update)))) (elfeed-update))))
(use-package elfeed-goodies (use-package elfeed-goodies
:straight t :straight t
:after (elfeed) :after (elfeed)
:init :init
(elfeed-goodies/setup) (elfeed-goodies/setup)
:config :config
(setq elfeed-goodies/entry-pane-position 'bottom)) (setq elfeed-goodies/entry-pane-position 'bottom))
#+end_src #+end_src
** Telegram ** Telegram