X-Git-Url: https://git.deb.at/w?a=blobdiff_plain;f=t-prot;h=ff9d8115c7415d857a3ef25d8c8b8894ff259e75;hb=b0d9c2864745744a3d0266f0461770b006483bdb;hp=81fbd71b49e6181f6771bb15b70707f7623741f0;hpb=93a81a76e82ae8b448d5dd15cad299572d4a90fd;p=pkg%2Ft-prot.git diff --git a/t-prot b/t-prot index 81fbd71..ff9d811 100755 --- a/t-prot +++ b/t-prot @@ -1,13 +1,13 @@ #!/usr/bin/perl -w -# $Id: t-prot,v 1.246 2006/06/17 22:45:55 jochen Exp $ +# $Id: t-prot,v 1.248 2006/11/30 14:06:27 jochen Exp $ require 5.006; use strict; use Fcntl qw(O_EXCL O_WRONLY O_CREAT); use Getopt::Mixed qw(nextOption); -use constant VER => '2.1'; +use constant VER => '2.2'; use constant REV => ''; -use constant REL => q$Revision: 1.246 $=~m/(\d+(?:\.\d+)+)/; +use constant REL => q$Revision: 1.248 $=~m/(\d+(?:\.\d+)+)/; # MTA expecting mail on STDIN # (you might have to adjust this if using a different MTA) use constant SENDMAIL => '/usr/sbin/sendmail -oi'; @@ -684,6 +684,7 @@ sub process_msg { if ($ms) { # bloat this array if you want more internationalization: my @tofu = ('Original Message', + 'Original-Nachricht', 'Ursprüngliche Nachricht', 'Ursprungliche Nachricht', 'Mensagem original',