mirror of
https://github.com/Swarsel/.dotfiles.git
synced 2025-12-06 09:07:21 +01:00
107 lines
3 KiB
EmacsLisp
107 lines
3 KiB
EmacsLisp
;; package setup here
|
|
(require 'package)
|
|
|
|
(package-initialize nil)
|
|
(setq package-enable-at-startup nil)
|
|
|
|
(add-to-list 'package-archives '("org" . "http://orgmode.org/elpa/") t)
|
|
|
|
(add-to-list 'package-archives
|
|
'("melpa" . "https://melpa.org/packages/") t)
|
|
|
|
;; (add-to-list 'package-archives
|
|
;; '("marmalade" .
|
|
;; "http://marmalade-repo.org/packages/"))
|
|
|
|
(package-initialize)
|
|
|
|
;; general add packages to list
|
|
(let ((default-directory "~/.emacs.d/elpa/"))
|
|
(normal-top-level-add-subdirs-to-load-path))
|
|
|
|
;; make sure 'use-package is installed
|
|
(unless (package-installed-p 'use-package)
|
|
(package-refresh-contents)
|
|
(package-install 'use-package))
|
|
|
|
;;; use-package
|
|
(require 'use-package)
|
|
|
|
;; Load elfeed
|
|
(use-package elfeed
|
|
:ensure t
|
|
:bind (:map elfeed-search-mode-map
|
|
; ("A" . bjm/elfeed-show-all)
|
|
; ("E" . bjm/elfeed-show-emacs)
|
|
; ("D" . bjm/elfeed-show-daily)
|
|
("q" . bjm/elfeed-save-db-and-bury)))
|
|
|
|
(require 'elfeed)
|
|
|
|
;; Load elfeed-org
|
|
(use-package elfeed-org
|
|
:ensure t
|
|
:config
|
|
(elfeed-org)
|
|
(setq rmh-elfeed-org-files (list "/var/lib/syncthing/.elfeed/elfeed.org"))
|
|
)
|
|
|
|
;; Laod elfeed-goodies
|
|
(use-package elfeed-goodies
|
|
:ensure t
|
|
)
|
|
|
|
(elfeed-goodies/setup)
|
|
|
|
;; Load elfeed-web
|
|
(use-package elfeed-web
|
|
:ensure t
|
|
)
|
|
|
|
;;; Elfeed
|
|
(global-set-key (kbd "C-x w") 'bjm/elfeed-load-db-and-open)
|
|
|
|
(define-key elfeed-show-mode-map (kbd "j") 'elfeed-goodies/split-show-next)
|
|
(define-key elfeed-show-mode-map (kbd "k") 'elfeed-goodies/split-show-prev)
|
|
(define-key elfeed-search-mode-map (kbd "j") 'next-line)
|
|
(define-key elfeed-search-mode-map (kbd "k") 'previous-line)
|
|
(define-key elfeed-show-mode-map (kbd "S-SPC") 'scroll-down-command)
|
|
|
|
|
|
;;write to disk when quiting
|
|
(defun bjm/elfeed-save-db-and-bury ()
|
|
"Wrapper to save the elfeed db to disk before burying buffer"
|
|
(interactive)
|
|
(elfeed-db-save)
|
|
(quit-window))
|
|
|
|
;;functions to support syncing .elfeed between machines
|
|
;;makes sure elfeed reads index from disk before launching
|
|
(defun bjm/elfeed-load-db-and-open ()
|
|
"Wrapper to load the elfeed db from disk before opening"
|
|
(interactive)
|
|
(elfeed-db-load)
|
|
(elfeed)
|
|
(elfeed-search-update--force)
|
|
(elfeed-update))
|
|
|
|
(defun bjm/elfeed-updater ()
|
|
"Wrapper to load the elfeed db from disk before opening"
|
|
(interactive)
|
|
(elfeed-db-save)
|
|
(quit-window)
|
|
(elfeed-db-load)
|
|
(elfeed)
|
|
(elfeed-search-update--force)
|
|
(elfeed-update))
|
|
|
|
(run-with-timer 0 (* 30 60) 'bjm/elfeed-updater)
|
|
|
|
(setq httpd-port 9812) ; replace NNNNN with a port equalling your start port + 10 (or whatever)
|
|
(setq httpd-host "0.0.0.0") ; replace NNNNN with a port equalling your start port + 10 (or whatever)
|
|
(setq httpd-root "/root/.emacs.d/elpa/elfeed-web-20240729.1741/") ; replace NNNNN with a port equalling your start port + 10 (or whatever)
|
|
|
|
(httpd-start)
|
|
(elfeed-web-start)
|
|
|
|
;; /home/swarsel/.emacs.d/elpa/elfeed-web-20240729.1741/
|