Commit 27c885e21f21925c6e9f4083de422bef5a72ddd8 - im

+6

-0

00changes less more

	0	148 (2005/03/08)
	1
	2	* IM/Imap.pm (imap_get): Fix regexp to fetch imap message.
	3	* 00readme: Typo fix.
	4	* dot.im/get.sbr.refile: Use create_folder() when refiling.
	5
0	6	147 (2004/07/04)
1	7
2	8	* imsetup.in, cnf.im/SiteConfig.in, dot.im/Config: Add `MsgIdUser'.

+4

-0

00diff less more

	0	Differences between IM148 and IM147
	1
	2	* Fix that imget fails to fetch imap message.
	3
0	4	Differences between IM147 and IM146
1	5
2	6	* New config variable `MboxFilter'. e.g. `MboxFilter=bogofilter -p -M -I'

+2

-2

00readme less more

2	2	Kazu Yamamoto
3	3	Tatsuya Kinoshita
4	4
5		Jul 4, 2004
	5	Mar 8, 2005
6	6
7	7
8	8	<<<Copyright>>>

98	98	October 2002) by this e-mail address.
99	99
100	100	For the latest news of IM, please see "IM (Internet Message) Official
101		Site" (http://tats.hauN.jp/im/).
	101	Site" (http://tats.hauN.org/im/).
102	102
103	103
104	104	<<<Programmers>>>

+2

-2

IM/Address.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Address.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Address.pm version 20050308(IM148)";
11	11
12	12	package IM::Address;
13	13	require 5.003;

+2

-2

IM/Alias.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Alias.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Alias.pm version 20050308(IM148)";
11	11
12	12	package IM::Alias;
13	13	require 5.003;

+2

-2

IM/Config.pm.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Config.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Config.pm version 20050308(IM148)";
11	11
12	12	package IM::Config;
13	13	require 5.003;

+2

-2

IM/EncDec.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::EncDec.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::EncDec.pm version 20050308(IM148)";
11	11
12	12	package IM::EncDec;
13	13	require 5.003;

+2

-2

IM/File.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Jul 7, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::File.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::File.pm version 20050308(IM148)";
11	11
12	12	package IM::File;
13	13	require 5.003;

+2

-2

IM/Folder.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Folder.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Folder.pm version 20050308(IM148)";
11	11
12	12	package IM::Folder;
13	13	require 5.003;

+2

-2

IM/GetPass.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 30, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::GetPass.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::GetPass.pm version 20050308(IM148)";
11	11
12	12	package IM::GetPass;
13	13	require 5.003;

+2

-2

IM/Grep.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Nov 03, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Grep.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Grep.pm version 20050308(IM148)";
11	11
12	12	package IM::Grep;
13	13	require 5.003;

+2

-2

IM/History.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Jul 6, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::History.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::History.pm version 20050308(IM148)";
11	11
12	12	package IM::History;
13	13	require 5.003;

+2

-2

IM/Http.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Http.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Http.pm version 20050308(IM148)";
11	11
12	12	package IM::Http;
13	13	require 5.003;

+3

-3

IM/Imap.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Imap.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Imap.pm version 20050308(IM148)";
11	11
12	12	package IM::Imap;
13	13	require 5.003;

191	191	im_notice("getting message $num.\n");
192	192	my $resp = &send_command($HANDLE, "im$seq UID FETCH $num RFC822", '');
193	193	my $failed = 0;
194		if ($resp =~ /^\* \d+ FETCH \((UID $num )?RFC822 \{(\d+)\}/i) {
	194	if ($resp =~ /^\* \d+ FETCH \(.*(UID $num )?RFC822 \{(\d+)\}/i) {
195	195	my $size = $2;
196	196	alarm(imap_timeout()) unless win95p();
197	197	while (<$HANDLE>) {

+2

-2

IM/Iso2022jp.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Iso2022jp.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Iso2022jp.pm version 20050308(IM148)";
11	11
12	12	package IM::Iso2022jp;
13	13	require 5.003;

+2

-2

IM/Japanese.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Japanese.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Japanese.pm version 20050308(IM148)";
11	11
12	12	package IM::Japanese;
13	13	require 5.003;

+2

-2

IM/LocalMbox.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::LocalMbox.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::LocalMbox.pm version 20050308(IM148)";
11	11
12	12	package IM::LocalMbox;
13	13	require 5.003;

+2

-2

IM/Log.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Log.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Log.pm version 20050308(IM148)";
11	11
12	12	package IM::Log;
13	13	require 5.003;

+2

-2

IM/MD5.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::MD5.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::MD5.pm version 20050308(IM148)";
11	11
12	12	package IM::MD5;
13	13	require 5.003;

+2

-2

IM/Message.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Message.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Message.pm version 20050308(IM148)";
11	11
12	12	package IM::Message;
13	13	require 5.003;

+2

-2

IM/MsgStore.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::MsgStore.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::MsgStore.pm version 20050308(IM148)";
11	11
12	12	package IM::MsgStore;
13	13	require 5.003;

+2

-2

IM/Nntp.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Nntp.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Nntp.pm version 20050308(IM148)";
11	11
12	12	package IM::Nntp;
13	13	require 5.003;

+2

-2

IM/Pop.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Pop.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Pop.pm version 20050308(IM148)";
11	11
12	12	package IM::Pop;
13	13	require 5.003;

+2

-2

IM/Recipient.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 27, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Recipient.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Recipient.pm version 20050308(IM148)";
11	11
12	12	package IM::Recipient;
13	13	require 5.003;

+2

-2

IM/Scan.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Scan.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Scan.pm version 20050308(IM148)";
11	11
12	12	package IM::Scan;
13	13	require 5.003;

+2

-2

IM/Smtp.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Smtp.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Smtp.pm version 20050308(IM148)";
11	11
12	12	package IM::Smtp;
13	13	require 5.003;

+2

-2

IM/Ssh.pm less more

5	5	### Author: Masatoshi Tsuchiya <tsuchiya@pine.kuee.kyoto-u.ac.jp>
6	6	### Internet Message Group <img@mew.org>
7	7	### Created: Oct 05, 1999
8		### Revised: Jul 4, 2004
	8	### Revised: Mar 8, 2005
9	9	###
10	10
11		my $PM_VERSION = "IM::Ssh.pm version 20031028(IM146)";
	11	my $PM_VERSION = "IM::Ssh.pm version 20050308(IM148)";
12	12
13	13	package IM::Ssh;
14	14	require 5.003;

+2

-2

IM/Stdio.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: May 7, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::Stdio.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::Stdio.pm version 20050308(IM148)";
11	11
12	12	package IM::Stdio;
13	13	require 5.003;

+2

-2

IM/TcpTransaction.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10		my $PM_VERSION = "IM::TcpTransaction.pm version 20031028(IM146)";
	10	my $PM_VERSION = "IM::TcpTransaction.pm version 20050308(IM148)";
11	11
12	12	package IM::TcpTransaction;
13	13	require 5.003;

+4

-4

IM/Util.pm less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
8		###
9
10		my $PM_VERSION = "IM::Util.pm version 20031028(IM146)";
	7	### Revised: Mar 8, 2005
	8	###
	9
	10	my $PM_VERSION = "IM::Util.pm version 20050308(IM148)";
11	11
12	12	package IM::Util;
13	13	require 5.003;

+5

-3

dot.im/get.sbr.refile less more

55	55	# $new_folder = '+mew-dist';
56	56	}
57	57	if ($new_folder ne $folder) {
58		$new_file = &message_name($new_folder, 'new') \|\| die $!;
59		&im_notice("refiling $folder/$msg to $new_folder.\n");
60		&im_rename($file, $new_file) \|\| die $!;
	58	if (&create_folder($new_folder) == 0) {
	59	$new_file = &message_name($new_folder, 'new') \|\| die $!;
	60	&im_notice("refiling $folder/$msg to $new_folder.\n");
	61	&im_rename($file, $new_file) \|\| die $!;
	62	}
61	63	}
62	64	close(MSG);
63	65	}

+3

-3

imali.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imali';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imcat.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: May 5, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imcat';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imcd.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imcd';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imclean.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imclean';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imget.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Jan 14, 1996
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imget';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imgrep.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imgrep';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imhist.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Jul 6, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imhist';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imhsync.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Jul 02, 1998
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imhsync';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imjoin.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: May 5, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imjoin';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imls.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Dec 31, 1995
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imls';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

immknmz.in less more

5	5	### Author: Shuichi Kitaguchi <kit@Mew.org>
6	6	### Internet Message Group <img@mew.org>
7	7	### Created: Sep 23, 1999
8		### Revised: Jul 4, 2004
	8	### Revised: Mar 8, 2005
9	9	###
10	10
11	11	BEGIN {

14	14	};
15	15
16	16	$Prog = 'immknmz';
17		my $VERSION_DATE = "20040704";
18		my $VERSION_NUMBER = "147";
	17	my $VERSION_DATE = "20050308";
	18	my $VERSION_NUMBER = "148";
19	19	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
20	20	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
21	21	Copyright (C) 1999 IM developing team

+3

-3

immv.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'immv';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

impack.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'impack';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

impath.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'impath';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imput.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Aug 31, 1995
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imput';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	$VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

impwagent.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Sep 13, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'impwagent';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imrm.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 23, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imrm';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imsetup.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: May 9, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imsetup';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imsort.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Jul 2, 1997
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imsort';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imstore.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Dec 31, 1995
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imstore';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team

+3

-3

imtar.in less more

4	4	###
5	5	### Author: Internet Message Group <img@mew.org>
6	6	### Created: Apr 08, 1998
7		### Revised: Jul 4, 2004
	7	### Revised: Mar 8, 2005
8	8	###
9	9
10	10	BEGIN {

13	13	};
14	14
15	15	$Prog = 'imtar';
16		my $VERSION_DATE = "20040704";
17		my $VERSION_NUMBER = "147";
	16	my $VERSION_DATE = "20050308";
	17	my $VERSION_NUMBER = "148";
18	18	my $VERSION = "${Prog} version ${VERSION_DATE}(IM${VERSION_NUMBER})";
19	19	my $VERSION_INFORMATION = "${Prog} (IM ${VERSION_NUMBER}) ${VERSION_DATE}
20	20	Copyright (C) 1999 IM developing team