Changeset 18877 for lang/perl/plagger/assets/plugins/CustomFeed-Script/www_toranoana_jp_mailorder.pl

Timestamp:

09/05/08 08:22:31 (4 months ago)

Author:

sweetpotato

Message:

• homepage2_nifty_com_4koma_new.pl: added
  
• shop_melonbooks_co_jp_tsuhan.pl: trivial change
  
• www3_kuradashi-shinkan_com_kanko_comicdb.pl: added
  
• www_toranoana_jp_mailorder.pl: trivial change
  

Files:

• lang/perl/plagger/assets/plugins/CustomFeed-Script/www_toranoana_jp_mailorder.pl (modified) (1 diff)

lang/perl/plagger/assets/plugins/CustomFeed-Script/www_toranoana_jp_mailorder.pl

@@ -49 +49 @@
 
 sub mk_body {
-    my $id = shift;
+    my $id = $_;
     my $dir = join '/', ($id =~ /^(\d{2})(\d{4})(\d{2})(\d{2})/);
     join '', map {