diff options
| author | fukachan <fukachan> | 2003-06-04 15:16:24 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2003-06-04 15:16:24 +0000 |
| commit | 59bf43f79020b558ecfb6e8c71642b4c8a5ef88c (patch) | |
| tree | f042df74c7847cae69b57f45c44bbe6388f6a0eb /img/dist/IM/imput.in | |
| parent | bf112251f43696e90733e499e7401bbeecd31d3d (diff) | |
| download | fml8-im-145.tar.gz fml8-im-145.tar.bz2 fml8-im-145.zip | |
im-145im-145
Diffstat (limited to 'img/dist/IM/imput.in')
| -rw-r--r-- | img/dist/IM/imput.in | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/img/dist/IM/imput.in b/img/dist/IM/imput.in index 8e64653c..b1368329 100644 --- a/img/dist/IM/imput.in +++ b/img/dist/IM/imput.in @@ -5,7 +5,7 @@ ### ### Author: Internet Message Group <img@mew.org> ### Created: Aug 31, 1995 -### Revised: Mar 22, 2003 +### Revised: Jun 1, 2003 ### BEGIN { @@ -13,7 +13,7 @@ BEGIN { @im_src_siteperl@ }; -$VERSION = "imput version 20030322(IM144)"; +$VERSION = "imput version 20030601(IM145)"; $Prog = 'imput'; @@ -656,7 +656,9 @@ help($EXPLANATION) && exit $EXIT_SUCCESS if $Help; # } ##### FINAL HEADER PROCESSING ##### - &add_header(\@Header, 1, 'X-'.$Resend_prefix.'Dispatcher', $VERSION); + if (use_xdispatcher()) { + &add_header(\@Header, 1, 'X-'.$Resend_prefix.'Dispatcher', $VERSION); + } &kill_header(\@Header, 'Bcc', 0); &kill_header(\@Header, 'Dcc', 0); &kill_header(\@Header, 'Fcc', 0); @@ -1738,7 +1740,7 @@ sub process_queue { rename("$queue_dir/$q.wrk", "$queue_dir/$q"); return; } - im_notice("processing $queue_dir/$q.wrk ...\n"); + im_notice("processing $queue_dir/$q.wrk...\n"); while (<QUEUE>) { chomp; last if (/^$/); |
