move var -> share

This commit is contained in:
Graham Knop 2010-07-07 03:04:06 -05:00
parent 894385396c
commit e4792fe9d9
11 changed files with 6 additions and 6 deletions

View file

@ -0,0 +1,20 @@
use WebGUI::Upgrade::Script;
use File::Basename;
use Cwd qw(realpath);
use File::Spec::Functions;
use WebGUI::Paths;
start_step "Moving preload files";
my $webgui_root = realpath( catdir( dirname( $INC{'WebGUI/Upgrade/Script.pm'} ), (updir) x 3 ) );
unlink catfile($webgui_root, 'lib', 'default.ttf');
unlink catfile($webgui_root, 'sbin', 'preload.custom.example');
unlink catfile($webgui_root, 'sbin', 'preload.exclude.example');
rename catfile($webgui_root, 'sbin', 'preload.custom'), WebGUI::Paths->preloadCustom;
rename catfile($webgui_root, 'sbin', 'preload.exclude'), WebGUI::Paths->preloadExclusions;
done;