Changeset 15726 for gsdl

Timestamp:

2008-05-27T15:05:32+12:00 (16 years ago)

Author:

mdewsnip

Message:

Removed a couple of debug statements.

File:

• gsdl/trunk/perllib/basebuilder.pm (modified) (2 diffs)

gsdl/trunk/perllib/basebuilder.pm

@@ -345 +345 @@
     }
     else {
-    print STDERR "Infodbtype: " . $self->{'infodbtype'} . "\n";
     $infodb_handle = &dbutil::open_infodb_write_handle($self->{'infodbtype'}, $infodb_file_path);
     if (!defined($infodb_handle))
@@ -401 +400 @@
                   'thistype' => [ "Invisible" ],
                   'contains' => [ join(";", @doc_list) ] };
-    print STDERR "Infodbtype: " . $self->{'infodbtype'} . "\n";
     &dbutil::write_infodb_entry($self->{'infodbtype'}, $infodb_handle, "browselist", $browselist_infodb);