fix oops in %config handling
authorjoey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Thu, 23 Mar 2006 04:02:19 +0000 (04:02 +0000)
committerjoey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>
Thu, 23 Mar 2006 04:02:19 +0000 (04:02 +0000)
IkiWiki/Setup/Standard.pm

index 76213b11aa2636987f3c669ae21379d984e767ff..da712e94aa784ea482f622e35fd4632ec0223635 100644 (file)
@@ -13,8 +13,9 @@ sub import {
        my %setup=%{$_[1]};
 
        ::debug("generating wrappers..");
+       my %startconfig=(%::config);
        foreach my $wrapper (@{$setup{wrappers}}) {
-               %::config=(%::config, verbose => 0, %setup, %{$wrapper});
+               %::config=(%startconfig, verbose => 0, %setup, %{$wrapper});
                ::checkoptions();
                ::gen_wrapper();
        }