🚀 go-pugleaf

  $@B<>e!wIY;NDL8&$G$9$1$I(J$@!D!D(J

>>>>> "$@EDCf(J" == TANAKA Hiroshi <tanaka@flab.fujitsu.co.jp> writes:
 >~/.signature+news.group.name
 >	      ^$@$3$NItJ,$O(J '+' $@$G$9!#(J
 > 
 >$@$H$$$&%U%!%$%k$r(J news.group.name $@$H$$$&%K%e!<%9%0%k!<%W$KBP$9(J$@$k(J 
 >signature $@$K$9$k%Q%C%A$G$9!#3:Ev$9$k4X?t$rC5$7$F!"CV$-49$($k$+!"(J
 >gnus $@$,%m!<%I$5$l$?$"$H$G!"$3(J$@$C$A$N4X?t$r%*!<%P%i%$%I$9$k$h$&$K!"(J
 >$@%m!<%I$9$k$+$7$F$/$@$5$$!#(J

  $@$&$%!A(J;_;$@!J0UL#ITL@$J$J$-$,$*!K(J

  $@5nG/;d$,%]%9%H$7$?(J gnuspost.el $@$KBP$9$k%Q%C%A$r:F%]%9%H$7$^$9!%(J

$@EDCf(J> $@NO:n$C$9$M!#KM$J$s$+<jH4$-$G(J$@!"$3$s$J$s=q$-$^$7$?!#(J
$@EDCf(J> $@%/%m%9%]%9%H$5$l$?5-;v$N>l9g$OL5;k$5$l$^$9!#(J

  $@%/%m%9%]%9%H$7$?>l9g$K$O(J$@0lHV:G=i$N%K%e!<%9%0%k!<%WMQ$N%7%0%M%A%c$,M-(J
$@8z$K$J$j$^$9!%(J

$@!t$3$l$r:#$^$G%]%9%H$7$F$J$+$C$?$N$O!$$3(J$@$N8e$K%]%9%H$5$l$?%W%m%0%i%`$N(J
$@!tJ}$,$h$/$G$-$F$?$+$i$J$s$G$9$,!D!D(J

-------$@$3$3$+$i!D!D(J

  $@@hF|%]%9%H(J$@$7$^$7$?(J NG $@$K$h$j(J signature $@$rJQ99$9$k$?$a$N(J patch $@$K(J
$@BP$7$F!$!V%/%m%9%]%9%H$N$H$-$K$b0l$DL\$N(J NG $@MQ(J$@$N(J siganture $@$,F~$k$h$&$K(J
$@$7$FM_$7$$!W$H$$$&MWK>$r<u$1$^$7$?!%(J

  $@:#2s$O$=$N$h$&$K$9$k$?$a$N(J patch $@$r(J$@%]%9%H$7$^$9!%(J

  $@Nc$($P!$(J

    Newsgroup : fj.editor.emacs , fj.sources , fj.rec.idol
    Distribution : fj

  $@$H$7$F$"$k$P$"$$$K$b(J ~/.siganture-fj.editor.emacs $@$rA^F~$9$k$h$&$K(J
$@$J$j$^$9!%(J

  $@$^$?(J ~/.signature-fj.editor.emacs $@$,$J$$>l9g$K$O!$(J~/.siganture-fj
$@$,A^F~$5$l$^$9!JFs$DL\0J9_$N(J NG $@$OL54X78$K$J(J$@$j$^$9!K(J

  $@$=$l$G$O!D!D!D(J

*** /usr/local/lib/emacs/lisp/gnuspost.el	Fri Jun 22 01:50:18 1990
--- gnuspost.el	Wed Mar 27 19:51:04 1991
***************
*** 398,403 ****
--- 398,404 ----
  	 (if gnus-signature-file
  	     (expand-file-name gnus-signature-file nil)))
  	(distribution nil)
+ 	(newsgroup nil) ;; unofficial patch by murakami
  	(artbuf (current-buffer))
  	(tmpbuf (get-buffer-create " *GNUS-posting*")))
      (save-excursion
***************
*** 410,423 ****
  	(goto-char (point-min))
  	(search-forward "\n\n")
  	(narrow-to-region (point-min) (point))
! 	(setq distribution (mail-fetch-field "distribution")))
        (widen)
        (if signature
  	  (progn
  	    ;; Change signature file by distribution.
  	    ;; Suggested by hyoko@flab.fujitsu.junet.
! 	    (if (file-exists-p (concat signature "-" distribution))
! 		(setq signature (concat signature "-" distribution)))
  	    ;; Insert signature.
  	    (if (file-exists-p signature)
  		(progn
--- 411,430 ----
  	(goto-char (point-min))
  	(search-forward "\n\n")
  	(narrow-to-region (point-min) (point))
! 	(setq distribution (mail-fetch-field "distribution"))
! 	(setq newsgroup (mail-fetch-field "newsgroups")) ;unofficial patch by murakami
! 	(setq newsgroup ; unofficial patch by murakami 
! 	      (substring newsgroup 0 (string-match " *," newsgroup 0)))) ; unofficial patch by murakami
        (widen)
        (if signature
  	  (progn
  	    ;; Change signature file by distribution.
  	    ;; Suggested by hyoko@flab.fujitsu.junet.
! 	    (if (file-exists-p (concat signature "-" newsgroup)) ;; unofficial patch by murakami
! 		(setq signature (concat signature "-" newsgroup)) ;; unofficial patch by murakami
! 	      (if (file-exists-p (concat signature "-" distribution))
! 		  (setq signature (concat signature "-" distribution)))
! 	      ) ;; unofficial patch by murakami
  	    ;; Insert signature.
  	    (if (file-exists-p signature)
  		(progn


--
      $@IY;NDL8&5f=j(J $@4pHW%7%9%F%`8&5fItLg(J                 $@B<>e(J $@2mI'(J
          $@J,;6%7%9%F%`8&5fIt(J $@Bh#28&5f<<(J    mul@flab.fujitsu.co.jp
                    $@!V%N%C%]$5$s$F$7$c(J$@$Y$i$J$-$c$$$$?M$J$N$K$M!A!W(J