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

Timestamp:

2005-03-18T14:44:23+13:00 (19 years ago)

Author:

kjdon

Message:

added a gli processing message

File:

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

trunk/gsdl/perllib/plugins/GAPlug.pm

@@ -83 +83 @@
     my $outhandle = $self->{'outhandle'};
     print $outhandle "GAPlug: processing $self->{'file'}\n" if $self->{'verbosity'} > 1;
+    print STDERR "<Processing n='$self->{'file'}' p='GAPlug'>\n" if $self->{'gli'};
+
 }