Re: Default save dir for things with an Archive-name ?

[kees_de_bruin@tasking.nl (Kees de Bruin)]

>>>>> "ajc" == Andrew J Cosgriff <ajc@bing.wattle.id.au> writes:

 ajc> When I go to save, say, an FAQ, or something out of
 ajc> alt.sources/comp.sources.*, Gnus defaults to wanting to save it as,
 ajc> say, ~/News/computer-security/ssh-faq - what I want to do, however,
 ajc> is to save it as something like ~/News/faq/computer-security/ssh-faq
 ajc> instead.

Hello Andrew,

I have the following functions in my .gnus (adjusted for your situation):

| (defun kdb/faq-save-directory ()
|   "Determine the directory where I want my FAQ files."
|   (expand-file-name "faq/" gnus-article-save-directory))
|
| (defun kdb/gnus-article-archive-name (group)
|   "Return the first instance of an \"Archive-name\" in the current buffer.
| This is stolen from the Gnus code."
|   (let ((case-fold-search t))
|     (when (re-search-forward "archive-name: *\\([^ \n\t]+\\)[ \t]*$" nil t)
|       (nnheader-concat (kdb/faq-save-directory)
|                        (match-string 1)))))

Setting the variable `gnus-split-methods' using the above function, Gnus
will save your FAQ files in the correct directory. Be careful when setting
this variable. It may contain the function `gnus-article-archive-name'. It
should be removed from the list.

| (setq gnus-split-methods '((kdb/gnus-article-archive-name))

I hope this helps,

Kees.

-- 
Kees de Bruin                                     kees_de_bruin@tasking.com
Software Engineer                                    http://www.tasking.com

Tasking Software BV,  Plotterweg 31,  3821 BB  Amersfoort,  The Netherlands
Phone: +31-33-455 85 84     Fax: +31-33-455 10 05    CompuServe: GO TASKING
------------------[ Quality Development Tools Worldwide ]------------------