doc/loncapafiles/removenolongerused.piml - diff

Return to removenolongerused.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

version 1.1.2.7, 2014/06/20 19:25:41	version 1.1.2.12, 2021/12/24 16:09:09
Line 21 my %files = (	Line 21 my %files = (
'londocroot' => ['adm/rat/extpickcode.html',	'londocroot' => ['adm/rat/extpickcode.html',
'adm/rat/extpickframe.html',	'adm/rat/extpickframe.html',
'adm/help/gif/vbkm.gif',	'adm/help/gif/vbkm.gif',
'adm/help/eps/vbkm.eps'],	'adm/help/eps/vbkm.eps',
	'adm/jQuery/js/jquery-1.3.2.min.js',
	'adm/jQuery/js/jquery-1.6.2.min.js',
	'adm/jQuery/js/jquery-1.11.3.min.js',
	'adm/jQuery/js/jquery-ui-1.7.2.custom.min.js',
	'adm/jQuery/js/jquery-ui-1.8.16.custom.min.js',
	'adm/jQuery/js/jquery-ui-1.11.4.custom.min.js',
	'adm/jQuery/css/smoothness/jquery-ui-1.7.2.custom.css',
	'adm/jQuery/css/smoothness/jquery-ui-1.8.16.custom.css',
	'adm/jQuery/js/css/smoothness/jquery-ui-1.11.4.custom.css',
	'adm/reactionresponse/reaction_frame.html',
	'adm/reactionresponse/reaction_window.html'],
'debug' => ['archive_coursedata_tables.pl'],	'debug' => ['archive_coursedata_tables.pl'],
);	);

my %dirs = (	my %dirs = (
'londocroot' => ['htmlarea',	'londocroot' => ['htmlarea',
'res/adm/pages/bookmarkmenu'],	'res/adm/pages/bookmarkmenu',
	'res/adm/pages/reactionresponse',
	'adm/jsMath',
	'adm/jQuery/css/ui-lightness'],
);	);

my @filestodelete = ();	my @filestodelete = ();
Line 65 if (@dirstodelete > 0) {	Line 79 if (@dirstodelete > 0) {
chomp($choice);	chomp($choice);
$choice =~ s/\s+//g;	$choice =~ s/\s+//g;
if ($choice eq 'Y') {	if ($choice eq 'Y') {
File::Path::remove_tree($dir);	File::Path::rmtree($dir);
}	}
}	}
}	}