git-svn-id: http://svn.inspircd.org/repository/trunk/inspircd@11490
e03df62e-2008-0410-955e-
edbf42e46eb7
$| = 1; # immediate print of lines without \n
+print "Processing changes for $action...\n";
for my $mod (keys %installed) {
next if $todo{$mod};
print "Uninstalling $mod $installed{$mod}\n";
unlink "src/modules/$mod.cpp";
}
+
+my $count = scalar keys %todo;
+print "Checking $count items...\n";
for my $mod (sort keys %todo) {
my $ver = $todo{$mod};
my $oldver = $installed{$mod};
}
close SRC;
}
+print "Done!\n";