X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-salt.el;h=be9fd4979498b10cabd9a7228cf87914d4407c45;hb=b19ab0bcf7b463d4b14b41bd23f2a5d62d03795a;hp=5ccf02b9eb6180217b512c1ea13583fb01f9b00a;hpb=1a96d7bf660263f25557962103bc0ec2495d1d07;p=gnus diff --git a/lisp/gnus-salt.el b/lisp/gnus-salt.el index 5ccf02b9e..be9fd4979 100644 --- a/lisp/gnus-salt.el +++ b/lisp/gnus-salt.el @@ -44,7 +44,7 @@ "*If non-nil, mark all unpicked articles as read.") (defvar gnus-summary-pick-line-format - "%-5p %U\%R\%z\%I\%(%[%4L: %-20,20n%]%) %s\n" + "%-5P %U\%R\%z\%I\%(%[%4L: %-20,20n%]%) %s\n" "*The format specification of the lines in pick buffers. It accepts the same format specs that `gnus-summary-line-format' does.") @@ -108,11 +108,8 @@ It accepts the same format specs that `gnus-summary-line-format' does.") (make-local-variable 'gnus-auto-select-first) (setq gnus-auto-select-first nil) ;; Change line format. - (make-local-variable 'gnus-summary-line-format) - (setq gnus-summary-line-format - gnus-summary-pick-line-format) - (make-local-variable 'gnus-summary-line-format-spec) - (setq gnus-summary-line-format nil) + (setq gnus-summary-line-format gnus-summary-pick-line-format) + (setq gnus-summary-line-format-spec nil) (gnus-update-format-specifications nil 'summary) (gnus-update-summary-mark-positions) ;; Set up the menu.