Update of /cvsroot/fink/experimental/thesin/finkmods
In directory sc8-pr-cvs1:/tmp/cvs-serv4724
Modified Files:
fink-verbcvs.patch
Log Message:
Added stats for quiet mode
Index: fink-verbcvs.patch
===================================================================
RCS file: /cvsroot/fink/experimental/thesin/finkmods/fink-verbcvs.patch,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- fink-verbcvs.patch 1 Jan 2003 23:38:08 -0000 1.6
+++ fink-verbcvs.patch 2 Jan 2003 16:43:52 -0000 1.7
@@ -1,6 +1,6 @@
diff -ruN fink/perlmod/Fink/SelfUpdate.pm fink-verbcvs/perlmod/Fink/SelfUpdate.pm
--- fink/perlmod/Fink/SelfUpdate.pm 2002-12-08 22:29:56.000000000 -0700
-+++ fink-verbcvs/perlmod/Fink/SelfUpdate.pm 2003-01-01 16:31:12.000000000 -0700
++++ fink-verbcvs/perlmod/Fink/SelfUpdate.pm 2003-01-02 09:40:43.000000000 -0700
@@ -23,7 +23,7 @@
package Fink::SelfUpdate;
@@ -10,15 +10,16 @@
use Fink::Config qw($config $basepath $distribution);
use Fink::NetAccess qw(&fetch_url);
use Fink::Engine;
-@@ -328,6 +328,7 @@
+@@ -328,6 +328,8 @@
sub do_direct_cvs {
my ($descdir, @sb, $cmd, $username, $msg);
+ my (@lines, $line, @dump);
++ my ($removed, $updated, $added) = (0,0,0);
$descdir = "$basepath/fink";
chdir $descdir or die "Can't cd to $descdir: $!\n";
-@@ -351,11 +352,31 @@
+@@ -351,11 +353,41 @@
print "\n";
&print_breaking($msg);
print "\n";
@@ -42,11 +43,21 @@
+ if ($msg =~ m/conflict/i or $msg =~ m/not in remote repository/i) {
+ push(@lines, $line);
+ }
++ if ($msg =~ m/updated/i and not $msg =~ m/locally/i) {
++ $updated++;
++ } elsif ($msg =~ m/added/i and not $msg =~ m/locally/i) {
++ $added++;
++ } elsif ($msg =~ m/removed/i and not $msg =~ m/locally/i) {
++ $removed++;
++ }
+ }
+ }
+ close(IN);
+
-+ print "Update from cvs took ".(time - $time)." seconds to run.\n";
++ $msg = "Selfupdate added $added, removed $removed and updated $updated ".
++ "file(s) in ".(time - $time)." second(s)\n";
++ &print_breaking($msg);
++
+ &cvs_repair(\@lines, \@dump);
+
+ print "\n";
-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
_______________________________________________
Fink-commits mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/fink-commits
