Diff for /doc/loncapafiles/removenolongerused.piml between versions 1.7 and 1.8

version 1.7, 2013/09/22 15:52:03 version 1.8, 2013/10/28 19:36:08
Line 36  my %dirs = ( Line 36  my %dirs = (
            );             );
   
 my %multis = (  my %multis = (
                  rcgifs'     => \@rcgifs,                  'rcgifs'     => \@rcgifs,
              );                ); 
 my @filestodelete = ();  my @filestodelete = ();
 my @dirstodelete = ();  my @dirstodelete = ();
Line 117  if (@multistodelete > 0) { Line 117  if (@multistodelete > 0) {
     $choice =~ s/\s+//g;      $choice =~ s/\s+//g;
     if ($choice eq 'Y') {      if ($choice eq 'Y') {
         foreach my $item (@multistodelete) {          foreach my $item (@multistodelete) {
             next if ((($item =~/\*/) || ($item eq '') || ($item eq '/'));              next if (($item =~/\*/) || ($item eq '') || ($item eq '/'));
             unlink($item);              unlink($item);
         }          }
     }      }

Removed from v.1.7  
changed lines
  Added in v.1.8


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