109e4020 failed to delete the clone of splittree.pl in the NetWare directory.

(I wonder how much of the rest of the NetWare directory is a copy-and-edit of
the win32 directory. I wonder how far NetWare is off working. I wonder if
anyone still uses NetWare.)

1 files changed, 0 insertions, 24 deletions

diff --git a/NetWare/splittree.pl b/NetWare/splittree.pl
deleted file mode 100644
index 3c76daadb1..0000000000
--- a/NetWare/splittree.pl
+++ /dev/null
@@ -1,24 +0,0 @@
-use DirHandle;
-use AutoSplit;
-
-sub splitthis {
-my ($top,$base,$dest) = @_;
-my $d = new DirHandle $base;
-if (defined $d) {
-	while (defined($_ = $d->read)) {
-		next if $_ eq ".";
-		next if $_ eq "..";
-		my $entry = "$base\\$_";
-		my $entrywithouttop = $entry;
-		$entrywithouttop =~ s/^$top//;
-		if (-d $entry) {splitthis ($top,$entry,$dest);}
-		else { 
-			next unless ($entry=~/pm$/i);
-			#print "Will run autosplit on $entry to $dest\n";
-			autosplit($entry,$dest,0,1,1);
-			};
-		};
-	};
-}
-
-splitthis $ARGV[0],$ARGV[0],$ARGV[1];