*** blorbtar-0.1.pl.old Wed Jul 18 17:44:17 2001 --- blorbtar-0.1.pl Wed Jul 18 17:47:01 2001 *************** *** 65,71 **** "PNG " => "png", "FORM" => \&FORM_ext, "MOD " => "mod", ! "Glul" => "ulx", "TADG" => "gam", "MSRL" => "mag", "ZCOD" => \&ZCOD_ext, --- 65,71 ---- "PNG " => "png", "FORM" => \&FORM_ext, "MOD " => "mod", ! "GLUL" => "ulx", "TADG" => "gam", "MSRL" => "mag", "ZCOD" => \&ZCOD_ext, *************** *** 130,136 **** seek CHUNK, 0, 0; read CHUNK, $magic, 64; if($magic =~ /^Glul/) { ! return "Glul"; } if($magic =~ /^TADS2 bin\x0a\x0d\x1a\x00\x76/s) { return "TADG"; --- 130,136 ---- seek CHUNK, 0, 0; read CHUNK, $magic, 64; if($magic =~ /^Glul/) { ! return "GLUL"; } if($magic =~ /^TADS2 bin\x0a\x0d\x1a\x00\x76/s) { return "TADG";