Diff for /doc/loncapafiles/removenolongerused.piml between versions 1.2 and 1.3

version 1.2, 2013/08/09 06:24:21 version 1.3, 2013/08/10 01:27:36
Line 17  my %paths = ( Line 17  my %paths = (
             );              );
     
 my %files = (  my %files = (
               'londaemons' => ['lonManage','lchtmldir','lonhttpd'],                'londaemons' => ['lonManage','lchtmldir','lonhttpd','lcadduser'],
               'apache'     => ['londropadd.pm','lonconstruct.pm',                'apache'     => ['londropadd.pm','lonconstruct.pm',
                                'lonremote.pm','admbookmarks.pm'],                                 'lonremote.pm','admbookmarks.pm'],
               'londocroot' => ['adm/rat/extpickcode.html',                'londocroot' => ['adm/rat/extpickcode.html',
Line 84  if (@dirstodelete > 0) { Line 84  if (@dirstodelete > 0) {
         print "$dir  -- delete? Enter: Y or N:\n";          print "$dir  -- delete? Enter: Y or N:\n";
         my $choice=<>;          my $choice=<>;
         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::remove_tree($dir);
         }          }

Removed from v.1.2  
changed lines
  Added in v.1.3


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>