(require 'gnus-bbdb)
(bbdb-initialize 'sc) ;; 'gnus / 'Gnus \e$B$O$O$:$7$F$/$@$5$$!#\e(B
(add-hook 'gnus-startup-hook 'gnus-bbdb-insinuate)
+(add-hook 'message-setup-hook 'gnus-bbdb-insinuate-message)
FLIM \e$B$G$O\e(B quote \e$B$5$l$?\e(B eword encoded word \e$B$O\e(B decode \e$B$5$l$^$;$s$,!"$=$l\e(B
\e$B$r6/@)E*$K\e(B decode \e$B$7$?$$>l9g$K$O!"<!$N@_Dj$r2C$($F$/$@$5$$!#\e(B
------ cut here ------ cut here ------ cut here ------ cut here ------
--- bbdb-hooks.el~ Tue Oct 13 03:13:50 1998
+++ bbdb-hooks.el Fri Oct 30 17:05:53 1998
-@@ -352,12 +352,22 @@
+@@ -352,12 +352,23 @@
(marker (bbdb-header-start))
field pairs fieldval ; do all bindings here for speed
regexp string notes-field-name notes
+ function)
+ (or (progn
+ (while (and (not extract-field-value-funtion)
-+ (setq function (pop function-list)))
++ (setq function (car function-list)))
+ (setq extract-field-value-funtion (funcall function)))
++ function-list (cdr function-list)))
+ extract-field-value-funtion)
+ (progn
+ (widen)
------ cut here ------ cut here ------ cut here ------ cut here ------
---
+gnus-bbdb/split-mail()
+
+nnmail-split-fancy \e$B$G;HMQ$9$k$?$a$N4X?t$G$9!#<!$N$h$&$K;HMQ$7$F$/$@$5$$!#\e(B
+
+(setq nnmail-split-methods 'nnmail-split-fancy
+ nnmail-split-fancy
+ '(|
+ .....
+*1 (: gnus-bbdb/split-mail "from\\|to\\|cc"
+ 'company "foo" "foo-group")
+ .....
+*2 (: gnus-bbdb/split-mail "from\\|to\\|cc" 'company "^bar")
+ .....
+*3 (: gnus-bbdb/split-mail "from\\|to\\|cc" 'group)
+ .....
+*4 (: gnus-bbdb/split-mail "from\\|to\\|cc" 'note "my friend"
+ '(|
+ .....
+ .....
+ ))
+
+*1 : From, To, Cc \e$B$$$:$l$+$N%X%C%@!<!&%U%#!<%k%I$K4^$^$l$k%a%$%k!&%"%I\e(B
+ \e$B%l%9$N$&$A\e(B BBDB \e$B$N\e(B `company' \e$B%U%#!<%k%I$K\e(B `foo' \e$B$,4^$^$l$k>l9g!"\e(B
+ `foo-group' \e$B$K?6$jJ,$1$^$9!#\e(B
+
+*2 : `company' \e$B%U%#!<%k%I$,\e(B `bar' \e$B$G;O$^$C$F$$$k>l9g!"\e(B`company' \e$B%U%#!<\e(B
+ \e$B%k%I$NFbMF$r$=$N$^$^%0%k!<%WL>$H$7$F;HMQ$7!"?6$jJ,$1$^$9!#\e(B
+
+*3 : `group' \e$B%U%#!<%k%I$,$"$k>l9g!"\e(B`group' \e$B%U%#!<%k%I$NFbMF$r$=$N$^$^\e(B
+ \e$B%0%k!<%WL>$H$7$F;HMQ$7!"?6$jJ,$1$^$9!#\e(B
+
+*4 : `note' \e$B%U%#!<%k%I$K\e(B `my friend' \e$B$,4^$^$l$k>l9g!"$=$N8e$m$K;XDj$5\e(B
+ \e$B$l$?5,B'$G?6$jJ,$1$^$9!#$3$N5,B'$N5-=RJ}K!$O!"DL>o$N\e(B
+ `nnmail-split-fancy' \e$B$G$N5-=RJ}K!$HF1$8$b$N$G$9!#\e(B