doc/loncapafiles/removenolongerused.piml - diff

Return to removenolongerused.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

version 1.10, 2014/06/20 19:23:03	version 1.13, 2016/02/20 00:12:54
Line 34 my %files = (	Line 34 my %files = (
my %dirs = (	my %dirs = (
'londocroot' => ['adm/lonLCDfont',	'londocroot' => ['adm/lonLCDfont',
'htmlarea',	'htmlarea',
'res/adm/pages/bookmarkmenu'],	'res/adm/pages/bookmarkmenu',
	'res/adm/pages/reactionresponse',
	'adm/jsMath'],
);	);

my %multis = (	my %multis = (
Line 90 if (@dirstodelete > 0) {	Line 92 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);
}	}
}	}
}	}