Changeset 27490 for lang/perl/WWW-MobileCarrierJP

Timestamp:

12/27/08 23:44:35 (4 years ago)

Author:

kan

Message:

fixed error message

Files:

• lang/perl/WWW-MobileCarrierJP/trunk/tools/check_http_mobileagent_flash_map.pl (modified) (1 diff)

lang/perl/WWW-MobileCarrierJP/trunk/tools/check_http_mobileagent_flash_map.pl

@@ -14 +14 @@
     for my $model (@{$version->{models}}) {
         unless (exists $FLASH_MAP->{$model->{model}}) {
-            warn "orz: $model";
+            warn "orz: $model->{model}";
         }
     }