--- bin/fw-info.pl	2007/11/18 14:50:21	74
+++ bin/fw-info.pl	2007/11/18 15:27:37	77
@@ -13,7 +13,7 @@
 my @images = @ARGV;
 push @images, '/srv/tftp/BANT-R' unless @images;
 
-my $magic = 'BLI223QH0';
+my $magic = 'BLI223Q';
 
 sub get_from {
 	my ($fh,$seek,$len) = @_;
@@ -37,7 +37,7 @@
 	my $name	= get_from($fh, 0x144, 15);
 	chomp($name);
 	$version = join('.',unpack('CCCC', $version));
-	printf("%8s %6s %s\t%s\n", $version, $board, $name, $path);
+	printf("%-8s %6s %-16s %s\n", $version, $board, $name, $path);
 }
 
 for my $path ( @images ) {