Changeset 2812


Ignore:
Timestamp:
2001-11-01T22:00:16+13:00 (20 years ago)
Author:
sjboddie
Message:

* empty log message *

Location:
trunk/gsdl/perllib/plugins
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/perllib/plugins/GAPlug.pm

    r2810 r2812  
    6060    my ($expat, $name, $sysid, $pubid, $internal) = @_;
    6161
    62     die if ($name ne "GreenstoneArchive");
     62    die "" if ($name ne "GreenstoneArchive");
    6363    my $outhandle = $self->{'outhandle'};
    6464    print $outhandle "GAPLug: processing $self->{'file'}\n";
  • trunk/gsdl/perllib/plugins/XMLPlug.pm

    r2810 r2812  
    3535
    3636use XML::Parser;
    37 use XML::Parser::Expat;
    3837
    3938my ($self);
     
    9695        print $outhandle "$plugin_name failed to process $file ($msg)\n";
    9796    }
    98 
    99     print $@;
    100 
    10197    return undef;
    10298    }
Note: See TracChangeset for help on using the changeset viewer.