Changeset 10463 for trunk/gsdl/perllib/plugins

Timestamp:

2005-08-10T15:25:28+12:00 (19 years ago)

Author:

mdewsnip

Message:

Removing the collection "tmp" directory is now only done when "-removeold" is specified to import.pl.

File:

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

trunk/gsdl/perllib/plugins/ConvertToPlug.pm

@@ -321 +321 @@
 
 
-# Remove collection specific tmp directory and all its contents.
-sub cleanup_tmp_area {
-    my $self = shift (@_);
-
-    my $tmp_dirname 
-    = &util::filename_cat($ENV{'GSDLCOLLECTDIR'}, "tmp");
-    &util::rm_r($tmp_dirname);
-    &util::mk_dir($tmp_dirname);
-}
-
 # Override BasPlug read
 # We don't want to get language encoding stuff until after we've converted
@@ -406 +396 @@
     # process the document
     $processor->process($doc_obj);
-    ##$self->cleanup_tmp_area();
 
     $self->{'num_processed'} ++;