--- a/.emacs-my	Sun Jul 08 21:39:10 2012 +0300
+++ b/.emacs-my	Sun Jul 08 22:13:39 2012 +0300
@@ -1279,7 +1279,7 @@
   (make-directory gnus-article-save-directory t)
   (let ( (buf (current-buffer))
          (field-to (message-fetch-field "To"))
-         (field-subject (message-fetch-field "Subject"))
+         (field-subject (or (message-fetch-field "Newsgroups") (message-fetch-field "Subject")))
          file )
     (setq file (concat gnus-article-save-directory "/" (format-time-string "%F_%T") "_" field-to "_" field-subject))
     (with-temp-file file