From 2e10fe80846e7911976d686cbc87a9b7d78da559 Mon Sep 17 00:00:00 2001
From: Aaron Trevena <aaron.trevena@gmail.com>
Date: Fri, 13 Jan 2006 19:02:46 +0000
Subject: [PATCH] added a couple of requisites to the makefile

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@451 48953598-375a-da11-a14b-00016c27c3ee
---
 META.yml                  | 1 +
 Makefile.PL               | 2 ++
 lib/Maypole/Components.pm | 3 ++-
 3 files changed, 5 insertions(+), 1 deletion(-)

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;
-- 
2.39.5