[svn:qpsmtpd] rev 427 - trunk/lib/Qpsmtpd
[email protected] 25 May 2005 16:36:15 -0000
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
Author: msergeant
Date: Wed May 25 09:36:14 2005
New Revision: 427
Modified:
trunk/lib/Qpsmtpd/Plugin.pm
Log:
Enforce stricture
Modified: trunk/lib/Qpsmtpd/Plugin.pm
==============================================================================
--- trunk/lib/Qpsmtpd/Plugin.pm (original)
+++ trunk/lib/Qpsmtpd/Plugin.pm Wed May 25 09:36:14 2005
@@ -122,6 +122,7 @@ sub compile {
'use Qpsmtpd::Constants;',
"require Qpsmtpd::Plugin;",
'use vars qw(@ISA);',
+ 'use strict;',
'@ISA = qw(Qpsmtpd::Plugin);',
($test_mode ? 'use Test::More;' : ''),
"sub plugin_name { qq[$plugin] }",