Unverified Commit 0241cf55 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

stats: perltidy, more frequent updates

parent 40417bc2

lib/Travelynx/Command/stats.pm

+7 −6
Original line number Diff line number Diff line
@@ -19,7 +19,8 @@ sub refresh_all { 


	say 'Refreshing all stats, this may take a while ...';



	my $total = $db->select( 'users', 'count(*) as count', { status => 1 } )->hash->{count};

	my $total = $db->select( 'users', 'count(*) as count', { status => 1 } )

	  ->hash->{count};

	my $i = 1;



	for
@@ -32,7 +33,7 @@ sub refresh_all { 
			year => $now->year

		);

		$tx->commit;

		if ($i == $total or ($i % 100) == 0) {

		if ( $i == $total or ( $i % 10 ) == 0 ) {

			printf( "%.f%% complete", $i * 100 / $total );

		}

	}