require the service classes before instantiating them

doy · Apr 15, 2010 · 13811c1 · 13811c1
1 parent f0b9397
commit 13811c1
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/lib/Resource/Pack/Resource.pm b/lib/Resource/Pack/Resource.pm
@@ -37,6 +37,7 @@ sub install {
 
 sub add_file {
     my $self = shift;
+    require Resource::Pack::File;
     $self->add_service(Resource::Pack::File->new(
         @_,
         parent => $self,
@@ -45,6 +46,7 @@ sub add_file {
 
 sub add_dir {
     my $self = shift;
+    require Resource::Pack::Dir;
     $self->add_service(Resource::Pack::Dir->new(
         @_,
         parent => $self,
@@ -53,6 +55,7 @@ sub add_dir {
 
 sub add_url {
     my $self = shift;
+    require Resource::Pack::URL;
     $self->add_service(Resource::Pack::URL->new(
         @_,
         parent => $self,