From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 18 Mar 2010 00:04:06 +0000 (+0000)
Subject: Missing ->new constructor
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=4e0d859b2190d7e426e044b6f38d18f5dfa6c213;p=Evergreen.git

Missing ->new constructor

git-svn-id: svn://svn.open-ils.org/ILS/trunk@15896 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/support-scripts/marc_stream_importer.pl b/Open-ILS/src/support-scripts/marc_stream_importer.pl
index 865792af08..668dfa17ca 100755
--- a/Open-ILS/src/support-scripts/marc_stream_importer.pl
+++ b/Open-ILS/src/support-scripts/marc_stream_importer.pl
@@ -193,7 +193,7 @@ sub process_batch_data {
     my $data = shift or $logger->error("process_batch_data called without any data");
     $data or return;
 
-    my ($handle, $tempfile) = File::Temp(DIR => $tempdir) or die "Cannot write tempfile in $tempdir";
+    my ($handle, $tempfile) = File::Temp->new(DIR => $tempdir) or die "Cannot write tempfile in $tempdir";
     print $handle $data;
     close $handle;