--- a/.emacs-my	Sat Nov 26 20:02:29 2011 +0200
+++ b/.emacs-my	Sun Nov 27 20:52:42 2011 +0200
@@ -1268,6 +1268,17 @@
 
 (setq gnus-site-init-file "~/.gnus.el")
 
+(defun my-kill-gnus ()
+  "Kill Gnus when exiting Emacs."
+  (let ( (gnus-interactive-exit nil) )
+    (gnus-group-exit)
+    ))
+
+(eval-after-load 'gnus
+  '(progn
+     (add-hook 'kill-emacs-hook 'my-kill-gnus)
+     ))
+
 ;; Store gnus specific files to '~/.gnus'.
 (setq
  gnus-directory "~/.gnus"