X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=28a1989b1f5d8f8ef2dc04103b984249210c83af;hp=67c0c7721316673a943402ab26d902965295e5ed;hb=4bd34280a9eb56c0c7f93fb3bea570fb9ebe5e5b;hpb=5133c53d9f68b49bbf653f8a795e62a404e63f9d

diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm
index 67c0c77..28a1989 100644
--- a/perl/Sesse/pr0n/Common.pm
+++ b/perl/Sesse/pr0n/Common.pm
@@ -32,7 +32,7 @@ BEGIN {
 		require Sesse::pr0n::Config_local;
 	};
 
-	$VERSION     = "v3.02";
+	$VERSION     = "v3.10";
 	@ISA         = qw(Exporter);
 	@EXPORT      = qw(&error &dberror);
 	%EXPORT_TAGS = qw();
@@ -817,13 +817,13 @@ sub make_infobox {
 		$model =~ s/^\s+//;
 		$model =~ s/\s+$//;
 
-		push @parts, [ ' - ', 0 ] if (scalar @parts > 0);
+		push @parts, [ "\x{00A0}\x{2013}\x{00A0}", 0 ] if (scalar @parts > 0);
 		push @parts, [ $model, 0 ];
 	}
 	
 	# classic fields
 	if (scalar @classic_fields > 0) {
-		push @parts, [ ' - ', 0 ] if (scalar @parts > 0);
+		push @parts, [ "\x{00A0}\x{2013}\x{00A0}", 0 ] if (scalar @parts > 0);
 
 		my $first_elem = 1;
 		for my $field (@classic_fields) {
@@ -838,14 +838,14 @@ sub make_infobox {
 		    $info->{'Flash'} =~ /no flash/i ||
 		    $info->{'Flash'} =~ /not fired/i ||
 		    $info->{'Flash'} =~ /Off/)  {
-			push @parts, [ ' - ', 0 ] if (scalar @parts > 0);
+			push @parts, [ "\x{00A0}\x{2013}\x{00A0}", 0 ] if (scalar @parts > 0);
 			push @parts, [ "No flash", 0 ];
 		} elsif ($info->{'Flash'} =~ /fired/i ||
 		         $info->{'Flash'} =~ /On/) {
-			push @parts, [ ' - ', 0 ] if (scalar @parts > 0);
+			push @parts, [ "\x{00A0}\x{2013}\x{00A0}", 0 ] if (scalar @parts > 0);
 			push @parts, [ "Flash", 0 ];
 		} else {
-			push @parts, [ ' - ', 0 ] if (scalar @parts > 0);
+			push @parts, [ "\x{00A0}\x{2013}\x{00A0}", 0 ] if (scalar @parts > 0);
 			push @parts, [ $info->{'Flash'}, 0 ];
 		}
 	}