Re: must remove gnus-format-specs from .newsrc.eld to start gnus

[jidanni@jidanni.org]

Every time I take it off it gets put back on next session, causing gnus
to be unable to start.


STOP PUTTING IT back in.


Here it is:

(setq gnus-format-specs '((article-mode "Gnus: %g %S%m" (concat (format "Gnus: %s %s%s" (gnus-short-group-name gnus-tmp-group-name) gnus-tmp-subject (gnus-article-mime-part-status)))) (summary-dummy "   %(:                             :%) %S\n" (progn (insert "   ") (gnus-put-text-property (point) (progn (insert ":                             :") (point)) gnus-mouse-face-prop gnus-mouse-face) (insert " " gnus-tmp-subject "\n"))) (summary-mode "Gnus: %G [%A] %Z" (concat (format "Gnus: %s [%d] %s" gnus-tmp-group-name gnus-tmp-article-number gnus-tmp-unread-and-unselected))) (summary "%U%R%z%I%(%2t %3{%~(cut-left 2)~(max-right 6)~(pad 6)o%}%3L|%6us|%-14,14f%)%3{%un%}:%s\n" (progn (insert gnus-tmp-unread gnus-tmp-replied gnus-tmp-score-char gnus-tmp-indentation) (gnus-put-text-property (point) (progn (insert (format "%2d " (gnus-summary-number-of-articles-in-thread (and (boundp 'thread) (car thread)) gnus-tmp-level))) (gnus-add-text-properties (point) (progn (insert (format "%6s" (let*
   ((val (eval (let
   ((val (eval (let
   ((val (eval (gnus-date-iso8601 (mail-header-date gnus-tmp-header))))) (if (> (string-width val) 2) (gnus-correct-substring val 2) val))))) (if (> (string-width val) 6) (if (gnus-lrm-string-p val) (concat (gnus-correct-substring val 0 6) #
  ("‎" 0 1 (invisible t))) (gnus-correct-substring val 0 6)) val)))) (need (- 6 (string-width val)))) (if (> need 0) (concat (make-string need 32) val nil) val)))) (point)) '(gnus-face t face bold)) (insert (format "%3s|%6s|%-14s" gnus-tmp-lines (gnus-user-format-function-s gnus-tmp-header) (let*
   ((val (eval (let
   ((val (eval (gnus-summary-from-or-to-or-newsgroups gnus-tmp-header gnus-tmp-from)))) (if (> (string-width val) 14) (if (gnus-lrm-string-p val) (concat (gnus-correct-substring val 0 14) #
  ("‎" 0 1 (invisible t))) (gnus-correct-substring val 0 14)) val)))) (need (- 14 (string-width val)))) (if (> need 0) (concat nil val (make-string need 32)) val)))) (point)) gnus-mouse-face-prop gnus-mouse-face) (gnus-add-text-properties (point) (progn (insert (gnus-user-format-function-n gnus-tmp-header)) (point)) '(gnus-face t face bold)) (insert ":" gnus-tmp-subject-or-nil "\n"))) (group "%B%T%S%p%P%3U|%3y: %(%-61,61G%) %d %L\n" (progn (insert (format "%c%d%c%c%s%3s|%3s: " gnus-tmp-summary-live (gnus-range-length (cdr (assq 'tick gnus-tmp-marked))) gnus-tmp-subscribed gnus-tmp-process-marked gnus-group-indentation (if (gnus-active gnus-tmp-group) (gnus-number-of-unseen-articles-in-group gnus-tmp-group) "*") gnus-tmp-number-of-unread)) (gnus-put-text-property (point) (progn (insert (format "%-61s" (let*
   ((val (eval (if (> (string-width gnus-tmp-qualified-group) 61) (if (gnus-lrm-string-p gnus-tmp-qualified-group) (concat (gnus-correct-substring gnus-tmp-qualified-group 0 61) #
  ("‎" 0 1 (invisible t))) (gnus-correct-substring gnus-tmp-qualified-group 0 61)) gnus-tmp-qualified-group))) (need (- 61 (string-width val)))) (if (> need 0) (concat nil val (make-string need 32)) val)))) (point)) gnus-mouse-face-prop gnus-mouse-face) (insert (format " %s %d\n" (gnus-group-timestamp-string gnus-tmp-group) gnus-tmp-level)))) (group-mode "Gnus: %%b {%M%:%S}" (concat (format "Gnus: %%b {%s%s%s}" gnus-tmp-news-method gnus-tmp-colon gnus-tmp-news-server))) (version . "24.0.50.1")))