Changeset 2812 for trunk/gsdl/perllib/plugins/GAPlug.pm

Timestamp:

2001-11-01T22:00:16+13:00 (22 years ago)

Author:

sjboddie

Message:

* empty log message *

File:

• trunk/gsdl/perllib/plugins/GAPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/GAPlug.pm

@@ -60 +60 @@
     my ($expat, $name, $sysid, $pubid, $internal) = @_;
 
-    die if ($name ne "GreenstoneArchive");
+    die "" if ($name ne "GreenstoneArchive");
     my $outhandle = $self->{'outhandle'};
     print $outhandle "GAPLug: processing $self->{'file'}\n";