support for unknown flags, for future backwards compatibility

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@236 48953598-375a-da11-a14b-00016c27c3ee

diff --git a/lib/Maypole/Application.pm b/lib/Maypole/Application.pm
index df66285c75572249e9df5733496a8f8e61e190c1..a3cd971163187bcd54a995533677a1947a7f802f 100644 (file)
--- a/lib/Maypole/Application.pm
+++ b/lib/Maypole/Application.pm
@@ -30,6 +30,7 @@ sub import {
             *{"$caller\::debug"} = sub { 1 };
             warn "Debugging enabled";
         }
+        elsif (/^-.*$/) { warn "Unknown flag: $_" }
         else {
 
             # The plugin caller should be our application class