--- Bauerbill.pm.bak	2010-02-11 21:31:49.518450503 -0500
+++ Bauerbill.pm	2010-02-11 21:59:06.144912983 -0500
@@ -201,9 +201,6 @@
     $self->abort(@_);
   };
   my ($clopts,$popts,$clargs) = $self->parse_cli_input(@args);
-  $self->{CPAN}->{CACHE} = $self->get_value('PacpanCache');
-  $self->{Hackage}->{CACHE} = $self->get_value('HackageCache');
-
 
   if (not @args or $self->get_value('--help'))
   {
@@ -252,6 +249,8 @@
   });
   $self->{MEMOIZE} = $self->get_value('Memoize');
 
+  $self->{CPAN}->{CACHE} = $self->get_value('PacpanCache');
+  $self->{Hackage}->{CACHE} = $self->get_value('HackageCache');
 
   if ($self->get_pacvalue('-Q')
   and $self->get_pacvalue('-u'))