From mboxrd@z Thu Jan  1 00:00:00 1970
From: rohara@sourceware.org <rohara@sourceware.org>
Date: 6 Jul 2006 16:23:41 -0000
Subject: [Cluster-devel] cluster/fence/agents/scsi fence_scsi.pl
Message-ID: <20060706162341.27266.qmail@sourceware.org>
List-Id: <cluster-devel.redhat.com>
To: cluster-devel.redhat.com
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit

CVSROOT:	/cvs/cluster
Module name:	cluster
Changes by:	rohara at sourceware.org	2006-07-06 16:23:41

Modified files:
	fence/agents/scsi: fence_scsi.pl 

Log message:
	Added extra output when verbose option is given.
	Fixed code to close stdin, stdout, stderr after open3 call.

Patches:
http://sourceware.org/cgi-bin/cvsweb.cgi/cluster/fence/agents/scsi/fence_scsi.pl.diff?cvsroot=cluster&r1=1.1&r2=1.2

--- cluster/fence/agents/scsi/fence_scsi.pl	2006/06/29 21:36:09	1.1
+++ cluster/fence/agents/scsi/fence_scsi.pl	2006/07/06 16:23:40	1.2
@@ -141,6 +141,10 @@
 	    push @volumes, $device;
 	}
     }
+
+    close($in);
+    close($out);
+    close($err);
 }
 
 sub check_sg_persist
@@ -153,6 +157,12 @@
 
     die "Unable to execute sg_persist.\n" if ($?>>8);
 
+    while (<$out>)
+    {
+	chomp;
+	print "OUT: $_\n" if $opt_v;
+    }
+
     close($in);
     close($out);
     close($err);