Changeset 9960


Ignore:
Timestamp:
2005-05-25T17:33:32+12:00 (19 years ago)
Author:
davidb
Message:

Minor refinement made to print statments the show how the plugin code is
progressing.

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

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/perllib/plugins/ImagePlug.pm

    r9853 r9960  
    373373
    374374    print STDERR "<Processing n='$file' p='ImagePlug'>\n" if ($gli);
    375     print $outhandle "ImagePlug processing $filename\n"
     375    print $outhandle "ImagePlug processing $file\n"
    376376        if $self->{'verbosity'} > 1;
    377377

  • trunk/gsdl/perllib/plugins/ZIPPlug.pm

    r9853 r9960  
    129129    &util::mk_all_dir ($tmpdir);
    130130
    131     print $outhandle "ZIPPlug: extracting $file_only to $tmpdir\n";
     131    print $outhandle "ZIPPlug: extracting $file_only to $tmpdir\n"
     132        if $self->{'verbosity'} > 1;
    132133
    133134    # save current working directory
Note: See TracChangeset for help on using the changeset viewer.