Permalink
Browse files

rename the work and work2 methods more descriptively

  • Loading branch information...
1 parent bebaaea commit 5e73d1703ebeaa97d4ac2b170ced637280f0c953 @rjbs rjbs committed Apr 11, 2011
Showing with 5 additions and 5 deletions.
  1. +2 −2 cron/mldistwatch
  2. +3 −3 lib/PAUSE/mldistwatch.pm
View
@@ -80,9 +80,9 @@ MAIN: {
}
my $mldw = PAUSE::mldistwatch->new(\%Opt);
if ($Opt{rewrite}) {
- $mldw->work2;
+ $mldw->rewrite_indexes;
} else {
- $mldw->work;
+ $mldw->reindex;
}
}
View
@@ -186,7 +186,7 @@ sub verbose {
print $logfh @what;
}
-sub work {
+sub reindex {
my $self = shift;
my $startdir = Cwd::cwd();
my $MLROOT = $self->mlroot;
@@ -206,10 +206,10 @@ sub work {
chdir $startdir or die "Could not chdir to '$startdir'";
rmtree $testdir;
return if $self->{OPT}{pick};
- $self->work2;
+ $self->rewrite_indexes;
}
-sub work2 {
+sub rewrite_indexes {
my $self = shift;
$self->rewrite02();
my $MLROOT = $self->mlroot;

0 comments on commit 5e73d17

Please sign in to comment.