.emacs-my
changeset 895 8bf321b7f86e
parent 894 d993e3e910ef
child 896 cb9551a0ce9a
equal deleted inserted replaced
894:d993e3e910ef 895:8bf321b7f86e
  1324 (defun my-kill-gnus ()
  1324 (defun my-kill-gnus ()
  1325   "Kill Gnus when exiting Emacs."
  1325   "Kill Gnus when exiting Emacs."
  1326   (let ( (gnus-interactive-exit nil) )
  1326   (let ( (gnus-interactive-exit nil) )
  1327     (gnus-group-exit)
  1327     (gnus-group-exit)
  1328     ))
  1328     ))
  1329 
       
  1330 (eval-after-load 'gnus
  1329 (eval-after-load 'gnus
  1331   '(progn
  1330   '(progn
  1332      (add-hook 'kill-emacs-hook 'my-kill-gnus)
  1331      (add-hook 'kill-emacs-hook 'my-kill-gnus)
  1333      ))
  1332      ))
       
  1333 
  1334 (eval-after-load 'gnus-art
  1334 (eval-after-load 'gnus-art
  1335   '(progn
  1335   '(progn
  1336      (setq gnus-visible-headers (concat gnus-visible-headers "\\|^Archived-At"))
  1336      (setq gnus-visible-headers (concat gnus-visible-headers "\\|^Archived-At"))
  1337      ))
  1337      ))
  1338 
  1338