X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=application-src%2Famraw.pl;h=cfd7e427ede362b7ca588a539def534a8f7dec6d;hb=cb115640695b55ed9c0a8dbeb414219b09438aa7;hp=0c947e87c2a36a636fd399968c7100ccdf844f1a;hpb=fd48f3e498442f0cbff5f3606c7c403d0566150e;p=debian%2Famanda

diff --git a/application-src/amraw.pl b/application-src/amraw.pl
index 0c947e8..cfd7e42 100644
--- a/application-src/amraw.pl
+++ b/application-src/amraw.pl
@@ -1,5 +1,5 @@
 #!@PERL@ 
-# Copyright (c) 2009 Zmanda, Inc.  All Rights Reserved.
+# Copyright (c) 2009, 2010 Zmanda, Inc.  All Rights Reserved.
 #
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the GNU General Public License version 2 as published
@@ -19,6 +19,7 @@
 
 use lib '@amperldir@';
 use strict;
+use warnings;
 use Getopt::Long;
 
 package Amanda::Application::Amraw;
@@ -158,11 +159,6 @@ sub command_backup {
     my $self = shift;
 
     my $level = $self->{level}[0];
-    my $mesgout_fd;
-    open($mesgout_fd, '>&=3') ||
-	$self->print_to_server_and_die("Can't open mesgout_fd: $!",
-				       $Amanda::Script_App::ERROR);
-    $self->{mesgout} = $mesgout_fd;
 
     if (defined($self->{index})) {
 	$self->{'index_out'} = IO::Handle->new_from_fd(4, 'w');
@@ -207,8 +203,8 @@ sub command_backup {
 	if ($ksize < 32) {
 	    $ksize = 32;
 	}
-	print $mesgout_fd "sendbackup: size $ksize\n";
-	print $mesgout_fd "sendbackup: end\n";
+	print {$self->{mesgout}} "sendbackup: size $ksize\n";
+	print {$self->{mesgout}} "sendbackup: end\n";
     }
 
     exit 0;