tone back claims of what tidy can do, it's not perfect

[ikiwiki.git] / ikiwiki

diff --git a/ikiwiki b/ikiwiki
index a10876a96ba10b6fb888c13742f32c34ddf97939..1342ec543f3e54c216e16cb615e9493c67484e8a 100755 (executable)
--- a/ikiwiki
+++ b/ikiwiki
@@ -1,5 +1,6 @@
 #!/usr/bin/perl -T
 $ENV{PATH}="/usr/local/bin:/usr/bin:/bin";
+delete @ENV{qw{IFS CDPATH ENV BASH_ENV}};
 
 package IkiWiki;
 use warnings;
@@ -22,6 +23,7 @@ sub getconfig () { #{{{
                        "verbose|v!" => \$config{verbose},
                        "rebuild!" => \$config{rebuild},
                        "refresh!" => \$config{refresh},
+                       "wrappers!" => \$config{wrappers},
                        "getctime" => \$config{getctime},
                        "wrappermode=i" => \$config{wrappermode},
                        "rcs=s" => \$config{rcs},
@@ -68,16 +70,6 @@ sub getconfig () { #{{{
 
                if (! $config{setup}) {
                        loadplugins();
-                       if (exists $hooks{getopt}) {
-                               foreach my $id (keys %{$hooks{getopt}}) {
-                                       $hooks{getopt}{$id}{call}->();
-                               }
-                       }
-                       if (grep /^-/, @ARGV) {
-                               print STDERR "Unknown option: $_\n"
-                                       foreach grep /^-/, @ARGV;
-                               usage();
-                       }
                        usage() unless @ARGV == 2;
                        $config{srcdir} = possibly_foolish_untaint(shift @ARGV);
                        $config{destdir} = possibly_foolish_untaint(shift @ARGV);