Re: released mairix backend nnmairix.el

[Bastien <bzg@altern.org>]

David <de_bb@arcor.de> writes:

> (setq gnus-auto-subscribed-groups
>   "^\\(nnml\\|nnfolder\\|nnmbox\\|nnmh\\|nnbabyl\\|nnmaildir\\).*\
> :\\([^z]\\|z$\\|\\z[^z]\\|zz$\\|zz[^_]\\|zz_$\\).*")

Done that, works smoothly, thanks.

> Just set your nnmairix groups to a lower group level (using 'S l' in
> the group buffer), so that it isn't updated when you hit 'g'. A level
> of '4' or '5' should do the trick (it depends on your value of
> gnus-activate-level).

Okay, will do that as well.

>>What do you think?
>
> Well, you can already create queries interactively based on the current
> article using "S g" in summary mode. 

Tyring to build a query on the body with S g b failed with this
backtrace (other conditions seem okay so far):

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  string-match("[^-.@& [:alnum:]]" nil)
  (while (string-match "[^-.@& [:alnum:]]" header) (setq header (replace-match "" t t header)))
  (if (> emacs-major-version 20) (while (string-match "[^-.@& [:alnum:]]" header) (setq header ...)) (while (string-match "[[]{}:<>]" header) (setq header ...)))
  (save-excursion (gnus-summary-toggle-header 1) (while (not achar) (message "Query (f=From,t=To,c=Cc,a=To or Cc,s=subject,b=body,m=Msgid): ") (setq achar ...) (when ... ...)) (set-buffer gnus-article-buffer) (setq header nil) (when (setq cq ...) (setq header ...)) (if (> emacs-major-version 20) (while ... ...) (while ... ...)) (while (string-match "[-& ]" header) (setq header ...)) (setq header (read-string ... header)) (push (concat ... ":" header) query) (setq finished (not ...) achar nil))
  (while (not finished) (save-excursion (gnus-summary-toggle-header 1) (while ... ... ... ...) (set-buffer gnus-article-buffer) (setq header nil) (when ... ...) (if ... ... ...) (while ... ...) (setq header ...) (push ... query) (setq finished ... achar nil)))
  (let ((char-header ...) (server ...) query achar header finished group threads cq) (when (or ... ...) (error "No article or summary buffer.")) (when (not server) (error "No nnmairix server found for back end %s:%s" ... ...)) (while (not finished) (save-excursion ... ... ... ... ... ... ... ... ... ...)) (setq threads (y-or-n-p "Include whole threads? ")) (setq group (read-string "Group name: ")) (set-buffer gnus-summary-buffer) (message "Creating group %s on server %s with query %s." group (gnus-method-to-server server) (mapconcat ... query " ")) (nnmairix-create-search-group server group query threads))
  nnmairix-create-search-group-from-message()
  call-interactively(nnmairix-create-search-group-from-message)

> However, that's only for creating permanent nnmairix groups but could
> be easily extended. Your suggestion would be even more flexible. I
> definitely will look into that.

Thanks very much!  I don't know if there are many people using mairix
out there but I switched from swish-e (+nnir) to this and it's really
faster.  Good to have nnmairix.el around.

-- 
Bastien