equal
deleted
inserted
replaced
1265 |
1265 |
1266 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1266 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1267 (message "gnus, mh-e") |
1267 (message "gnus, mh-e") |
1268 |
1268 |
1269 (setq gnus-site-init-file "~/.gnus.el") |
1269 (setq gnus-site-init-file "~/.gnus.el") |
|
1270 |
|
1271 (defun my-kill-gnus () |
|
1272 "Kill Gnus when exiting Emacs." |
|
1273 (let ( (gnus-interactive-exit nil) ) |
|
1274 (gnus-group-exit) |
|
1275 )) |
|
1276 |
|
1277 (eval-after-load 'gnus |
|
1278 '(progn |
|
1279 (add-hook 'kill-emacs-hook 'my-kill-gnus) |
|
1280 )) |
1270 |
1281 |
1271 ;; Store gnus specific files to '~/.gnus'. |
1282 ;; Store gnus specific files to '~/.gnus'. |
1272 (setq |
1283 (setq |
1273 gnus-directory "~/.gnus" |
1284 gnus-directory "~/.gnus" |
1274 gnus-agent-directory "~/.gnus/agent/" |
1285 gnus-agent-directory "~/.gnus/agent/" |