From 6cbdc3272c5333de4ac6ba27af748e3c8d25912c Mon Sep 17 00:00:00 2001 From: Graham Knop Date: Wed, 17 Mar 2010 15:04:35 -0500 Subject: [PATCH] move preload files in upgrade --- var/upgrades/upgrade_7.9.3-8.0.0.pl | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/var/upgrades/upgrade_7.9.3-8.0.0.pl b/var/upgrades/upgrade_7.9.3-8.0.0.pl index cc55df740..b21d870b2 100644 --- a/var/upgrades/upgrade_7.9.3-8.0.0.pl +++ b/var/upgrades/upgrade_7.9.3-8.0.0.pl @@ -27,6 +27,7 @@ my $session = start(); # this line required moveMaintenance($session); migrateToNewCache($session); +moveFileLocations($session); finish($session); # this line required @@ -57,10 +58,21 @@ sub migrateToNewCache { sub moveMaintenance { my $session = shift; print "\tMoving maintenance file " unless $quiet; - unlink "../maintenance.html"; + unlink '../../docs/maintenance.html'; print "DONE!\n" unless $quiet; } +sub moveFileLocations { + my $session = shift; + print "\tMoving preload files " unless $quiet; + unlink '../../sbin/preload.custom.example'; + rename '../../sbin/preload.custom', File::Spec->catfile(WebGUI::Paths->etc, 'preload.custom'); + unlink '../../sbin/preload.exclude.example'; + rename '../../sbin/preload.exclude', File::Spec->catfile(WebGUI::Paths->etc, 'preload.exclude'); + unlink '../../lib/default.ttf'; + print "Done.\n" unless $quiet; +} + # -------------- DO NOT EDIT BELOW THIS LINE --------------------------------