exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Compare commits

base: exot:5178d039f4933dbdebf1bfad43f63cd31788afbc
Branches Tags
exot:master
..
compare: exot:83421c072a6aa0f1483632625e8fb4e5f2043e1d
Branches Tags
exot:master

3 Commits
5178d039f4 ... 83421c072a

Author SHA1 Message Date
Daniel Borchmann
83421c072a
Remove trailing whitespace after HTML rendering a file 
Those whitespaces are neither necessary nor helpful.
 2022-02-06 20:57:36 +01:00
Daniel Borchmann
0a76969a95
Automatically expire elements in Gnus groups via gnus handler 
So I don't have to do it manually.

Not sure whether this works, though.
 2022-02-06 20:56:46 +01:00
Daniel Borchmann
940c4b04a8
Remove explicit initialization of gnus-demon 
This is automatically done by `gnus-demon-add-handler`.
 2022-02-06 20:56:19 +01:00
2 changed files with 4 additions and 2 deletions
Show Stats Expand all files Collapse all files

3
init.el
View File

@ -1871,7 +1871,8 @@
;; Automatically scan for new news ;; Automatically scan for new news
(gnus-demon-add-handler 'db/gnus-demon-scan-news-on-level-2 5 5) (gnus-demon-add-handler 'db/gnus-demon-scan-news-on-level-2 5 5)
(add-hook 'gnus-started-hook #'gnus-demon-init) ;; Automatically expire groups on idle
(gnus-demon-add-handler 'gnus-group-expire-all-groups 10 5)
;; Visit group under point and immediately close it; this updates ;; Visit group under point and immediately close it; this updates
;; gnus’ registry as a side-effect ;; gnus’ registry as a side-effect

3
site-lisp/db-utils.el
View File

@ -460,7 +460,8 @@ Does not replace CRLF with CRCRLF, and so on."
(interactive "f") (interactive "f")
(unless (file-readable-p file) (unless (file-readable-p file)
(user-error "Cannot read file: %s" file)) (user-error "Cannot read file: %s" file))
(shr-render-buffer (find-file-noselect file))) (shr-render-buffer (find-file-noselect file))
(delete-trailing-whitespace))
;; Base45 Decoding ;; Base45 Decoding