Eric Abrahamsen <e...@ericabrahamsen.net> writes: > fkq...@autistici.org writes: > >> Eric Abrahamsen <e...@ericabrahamsen.net> writes: >> >>> Fkqqrr <fkq...@autistici.org> writes: >>> >>>> Eric Abrahamsen <e...@ericabrahamsen.net> writes: >>>> >>>>> fkqqrr <fkq...@autistici.org> writes: >>>>> >>>>>> When sending email in Gnus, 'sent' emails by default go into >>>>>> 'archive' folder locally. >>>>>> >>>>>> How to set sent emails to IMAP sent folder? >>>>> >>>>> You can set the `gnus-message-archive-group' option to the desired >>>>> "Sent" folder. If you have more than one account you're trying to set >>>>> up, you can set that option to a function that takes one argument, a >>>>> group name, and returns the appropriate archive group. In my case: >>>>> >>>>> (defun my-archiver-figure-outer (group) >>>>> (cond ((string-match-p "nnimap\\+This-Account\\|gmane" group) >>>>> "nnimap+This-Account:Sent") >>>>> ((string-match-p "nnimap\\+That-Account" group) >>>>> "nnimap+That-Account:Sent"))) >> If all `cond' does not match, where will the `archive' message go? >> (for example, just write a new mail by `m' without enterning any >> group. Just stay on the start `Group' buffer) >> >> I know the default is `archive' on local disk. But this line: >>>>> (setq gnus-message-archive-group #'my-archiver-figure-outer) >> prevents un-matched sent items archived locally. >> >> Should I add a condition: >> >> ((string-match-p ".*" group) >> "nnimap+3rd-account:Sent") > > The `cond' form usually takes a final "t" condition, which serves as a > catch-all for when nothing else matches. I didn't put one in there > because I couldn't be bothered. So: > > (cond ((string-match-p "nnimap\\+NEA\\|gmane" group) > "nnimap+NEA:Sent") > ((string-match-p "nnimap\\+NPR" group) > "nnimap+NPR:Sent") > (t "archive")) > > Or "nnimap+3rd-account:Sent", if you like. > > An issue:
I can see the header: `Gcc: nnimap+NEA:Sent.misc-news'. But the news is actually archived to `Gcc: nnimap+NPR:Sent.misc-news'. On my system, NPR is the default `gnus-message-archive-method'. -- Who am I? Where am I from? Where am I going? _______________________________________________ info-gnus-english mailing list info-gnus-english@gnu.org https://lists.gnu.org/mailman/listinfo/info-gnus-english