Changeset 15115

Show
Ignore:
Timestamp:
20.03.2008 20:43:39 (11 years ago)
Author:
ak19
Message:

Added SourceReplaceable? in output for plugin xml. srcreplaceable is a new option to work new script replace_srcdoc_with_html.pl

Files:
1 modified

Legend:

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

    r15018 r15115  
    290290    gsprintf(STDERR, "  <Blocks>$block_exp</Blocks>\n"); 
    291291    gsprintf(STDERR, "  <Explodes>" . ($pluginoptions->{'explodes'} || "no") . "</Explodes>\n"); 
     292    # adding new option that works with replace_srcdoc_with_html.pl 
     293    gsprintf(STDERR, "  <SourceReplaceable>" . ($pluginoptions->{'srcreplaceable'} || "no") . "</SourceReplaceable>\n"); 
    292294    unless (defined($high_level_information_only)) { 
    293295    gsprintf(STDERR, "  <Arguments>\n"); 
     
    518520    my $self = shift (@_); 
    519521    my ($pluginfo, $base_dir, $processor, $maxdocs) = @_; 
     522 
     523   #my ($cpackage,$cfilename,$cline,$csubr,$chas_args,$cwantarray) = caller(0); 
     524   #print STDERR "Calling method; $cfilename:$cline $cpackage->$csubr\n"; 
     525 
    520526    $self->initialise_extractors(); 
    521527}