new mechanism for quiet

This commit is contained in:
Graham Knop 2010-07-06 06:15:55 -05:00
parent 4444ca385f
commit e87f80ac88
6 changed files with 34 additions and 13 deletions

View file

@ -5,7 +5,7 @@ use Cwd qw(realpath);
use File::Spec::Functions;
use WebGUI::Paths;
report "\tMoving preload files ... ";
start_step "Moving preload files";
my $webgui_root = realpath( catdir( dirname( $INC{'WebGUI/Upgrade/Script.pm'} ), (updir) x 3 ) );

View file

@ -1,7 +1,7 @@
use WebGUI::Upgrade::Script;
use Module::Find;
report "\tMigrating to new cache ... ";
start_step "Migrating to new cache";
rm_lib
findallmod('WebGUI::Cache'),

View file

@ -5,7 +5,7 @@ use Cwd qw(realpath);
use File::Spec::Functions;
use WebGUI::Paths;
report "\tMoving preload files ... ";
start_step "Moving preload files";
my $webgui_root = realpath( catdir( dirname( $INC{'WebGUI/Upgrade/Script.pm'} ), (updir) x 3 ) );

View file

@ -6,7 +6,7 @@ use Cwd qw(realpath);
my $webgui_root = realpath( catdir( dirname( $INC{'WebGUI/Upgrade/Script.pm'} ), (updir) x 3 ) );
report "\tMoving maintenance file ... ";
start_step "Moving maintenance file";
unlink catfile($webgui_root, 'docs', 'maintenance.html');