X-Git-Url: http://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=PerlMail%2FContacts.pm;h=ea210ee6549ff933ae9ef8e7a45a57a63aa024cb;hp=7f1d0b353ec772b85f7de892d08d8f9ada31daf5;hb=9d03569bd26dfb0f54f21063445fc9d28ed1c4d3;hpb=eafa2867cd90945b429ab07e3d844377a580ce97 diff --git a/PerlMail/Contacts.pm b/PerlMail/Contacts.pm index 7f1d0b3..ea210ee 100644 --- a/PerlMail/Contacts.pm +++ b/PerlMail/Contacts.pm @@ -1,7 +1,7 @@ #! /usr/bin/perl -w # # $Id$ -# Copyright (C) 2002 Jan Kratochvil +# Copyright (C) 2002-2003 Jan Kratochvil # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -18,7 +18,7 @@ # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -package Contacts; +package PerlMail::Contacts; use vars qw($VERSION); $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; }; use strict;