From: Aaron Trevena Date: Fri, 13 Jan 2006 19:02:46 +0000 (+0000) Subject: added a couple of requisites to the makefile X-Git-Tag: 2.11~67 X-Git-Url: https://git.decadent.org.uk/gitweb/?a=commitdiff_plain;h=2e10fe80846e7911976d686cbc87a9b7d78da559;p=maypole.git added a couple of requisites to the makefile git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@451 48953598-375a-da11-a14b-00016c27c3ee --- diff --git a/META.yml b/META.yml index 1b91c7e..5188168 100644 --- a/META.yml +++ b/META.yml @@ -17,6 +17,7 @@ requires: Class::DBI::Plugin::RetrieveAll: 0 Class::DBI::SQLite: 0 Digest::MD5: 0 + File::MMagic::XS: 0.08 HTTP::Body: 0.5 HTTP::Headers: 1.59 Template: 0 diff --git a/Makefile.PL b/Makefile.PL index 37f3ad9..9f104ff 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -17,6 +17,8 @@ WriteMakefile( Class::DBI => 0.96, Class::DBI::SQLite => 0, CGI::Untaint => 0, + CGI::Untaint::date => 0, + CGI::Untaint::email => 0, UNIVERSAL::moniker => 0, UNIVERSAL::require => 0, URI => 0, diff --git a/lib/Maypole/Components.pm b/lib/Maypole/Components.pm index 48c54c7..31d6ac2 100644 --- a/lib/Maypole/Components.pm +++ b/lib/Maypole/Components.pm @@ -1,10 +1,11 @@ package Maypole::Components; -use base 'Maypole'; use strict; use warnings; use URI; use URI::QueryParam; +our @ISA = qw(Maypole); + sub new { my ($class,$r) = @_; my $self = bless { config => $r->config, parent => $r }, $class;