diff options
| -rw-r--r-- | gnus.org | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -390,7 +390,7 @@ #+end_src * Group parameters #+begin_src emacs-lisp - (setq gnus-permanently-visible-groups "^nnselect:.*-today") + (setq gnus-permanently-visible-groups "^nnselect:.*") (setq gnus-parameters `(("^nnimap:jao/.*" @@ -467,7 +467,7 @@ (setq gnus-not-empty-thread-mark ?·) ; ↓) (setq jao-gnus--summary-line-fmt (concat "%%U %%*%%R %%uj " - "[ %%~(max-right 23)~(pad-right 23)n " + "[ %%~(max-right 23)~(pad-right 23)uf " " %%I%%~(pad-left 2)t ] %%s" "%%-%s=" "%%~(max-right 8)~(pad-left 8)&user-date;" @@ -503,6 +503,11 @@ "¬" ;; "~" " ")))) + (defun gnus-user-format-function-f (headers) + (let* ((from (gnus-header-from headers)) + (from (gnus-summary-extract-address-component from))) + (replace-regexp-in-string "ElDiario\\.es *\\|The Guardian: *" "" from))) + (setq gnus-user-date-format-alist '(((gnus-seconds-today) . "%H:%M") ((+ 86400 (gnus-seconds-today)) . "'%H:%M") |