Skip to content

Commit

Permalink
Fix an I/O wrapping problem with checking for broken file assets and …
Browse files Browse the repository at this point in the history
…storage locations.
  • Loading branch information
perlDreamer committed Apr 2, 2012
1 parent d4f63b2 commit 604887f
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions sbin/findBrokenAssets.pl
Original file line number Original file line Diff line number Diff line change
Expand Up @@ -253,15 +253,15 @@ sub progress {
my $file_asset = eval { $get_asset->() }; my $file_asset = eval { $get_asset->() };
if ( $@ || Exception::Class->caught() ) { if ( $@ || Exception::Class->caught() ) {
##Do nothing, since it would have been caught above ##Do nothing, since it would have been caught above
printf "\r%-68s", "No asset to check"; printf "\r%-68s\n", "No asset to check";
} }
elsif (!$file_asset) { elsif (!$file_asset) {
last FILE_ASSET last FILE_ASSET
} }
else { else {
my $storage = $file_asset->getStorageLocation; my $storage = $file_asset->getStorageLocation;
if (! $storage) { if (! $storage) {
printf "\r%-s", "-- No storage location: ".$file_asset->getId." storageId: ".$file_asset->get('storageId'); printf "\r%-s\n", "-- No storage location: ".$file_asset->getId." storageId: ".$file_asset->get('storageId');
} }
else { else {
my $file = $storage->getPath($file_asset->get('filename')); my $file = $storage->getPath($file_asset->get('filename'));
Expand All @@ -276,9 +276,9 @@ sub progress {
print "Could not purge File Asset"; print "Could not purge File Asset";
} }
} }
print "\n";
} }
} }
print "\n";
} }
progress( $file_assets, $count++ ) unless $no_progress; progress( $file_assets, $count++ ) unless $no_progress;
} }
Expand Down

0 comments on commit 604887f

Please sign in to comment.