X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FApplication.pm;h=fcbb13cadbae123204652dbb24b3a22770ff1e63;hb=2f847230e87321d044cb12ae039c37bde0259bd9;hp=e0c08fff70e6604f060c4d7f7b8b19ff1761eb0c;hpb=3d3d38f2f6639c90c98c72dc0167a82d52ce9ec4;p=maypole.git diff --git a/lib/Maypole/Application.pm b/lib/Maypole/Application.pm index e0c08ff..fcbb13c 100644 --- a/lib/Maypole/Application.pm +++ b/lib/Maypole/Application.pm @@ -3,6 +3,7 @@ package Maypole::Application; use strict; use warnings; use UNIVERSAL::require; +use Maypole; our @ISA; @@ -17,6 +18,7 @@ sub import { *{"$caller\::debug"} = sub { 1 }; warn "Debugging enabled"; } + elsif (/^-.*$/) { warn "Unknown flag: $_" } else { # The plugin caller should be our application class @@ -49,6 +51,12 @@ Maypole::Application - Maypole Universal Frontend use Maypole::Application; + use Maypole::Application qw(Config::YAML); + + use Maypole::Application qw(-Debug Config::YAML -Setup); + + use Maypole::Application qw(Config::YAML Loader -Setup -Debug); + =head1 DESCRIPTION This is a universal frontend for mod_perl1, mod_perl2 and CGI.