Changeset 22038

Timestamp:

2010-05-05T14:54:37+12:00 (14 years ago)

Author:

davidb

Message:

Tweaked print statment to be more consistent with other classifier print statements

File:

• main/trunk/greenstone2/perllib/classify/AZCompactList.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/classify/AZCompactList.pm

@@ -217 +217 @@
 
     if (($edit_mode eq "delete") || ($edit_mode eq "update")) {
-        print $outhandle "  Deleting $full_doc_OID\n";
+        print $outhandle "  Deleting $full_doc_OID for AZCompactList\n";
         delete $self->{'list'}->{$full_doc_OID};
         delete $self->{'listmetavalue'}->{$full_doc_OID};