Index: /lang/perl/WWW-MobileCarrierJP/trunk/lib/WWW/MobileCarrierJP/ThirdForce/HTTPHeader.pm
===================================================================
--- /lang/perl/WWW-MobileCarrierJP/trunk/lib/WWW/MobileCarrierJP/ThirdForce/HTTPHeader.pm (revision 14508)
+++ /lang/perl/WWW-MobileCarrierJP/trunk/lib/WWW/MobileCarrierJP/ThirdForce/HTTPHeader.pm (revision 29939)
@@ -14,8 +14,8 @@
 
         process 'td:nth-child(2)', 'x-jphone-name',    'TEXT';
-        process 'td:nth-child(3)', 'x-jphone-display', 'TEXT';
+        process 'td:nth-child(3)', 'x-jphone-display', [ 'TEXT', \&_asterisk ];
         process 'td:nth-child(4)', 'x-jphone-color',   'TEXT';
-        process 'td:nth-child(5)', 'x-jphone-sound', [ 'TEXT', \&_undefine, ];
-        process 'td:nth-child(6)', 'x-jphone-smaf',  [ 'TEXT', \&_undefine, ];
+        process 'td:nth-child(5)', 'x-jphone-sound', [ 'TEXT', \&_undefine ];
+        process 'td:nth-child(6)', 'x-jphone-smaf',  [ 'TEXT', \&_undefine ];
 
         # maybe, no person needs x-s-* information.
@@ -26,7 +26,9 @@
 );
 
+sub _asterisk { s/ x /*/ }
+
 sub _undefine {
     my $x = shift;
-    $x =~ /^(?:−|-)$/ ? undef : $x;
+    $x =~ /^(?:−|-|\x{d7})$/ ? undef : $x;
 }