From 30162322249bf0fdcfb9f8a04de328683da70181 Mon Sep 17 00:00:00 2001
From: Mark Buechler <mark.buechler@gmail.com>
Date: Tue, 15 Jun 2010 16:46:17 +0000
Subject: [PATCH] - Small fix to driverIsVirtualCapable().

git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@1772 d57e44dd-8a1f-0410-8b47-8ef2f437770f
---
 scstadmin/scst-0.9.00/lib/SCST/SCST.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scstadmin/scst-0.9.00/lib/SCST/SCST.pm b/scstadmin/scst-0.9.00/lib/SCST/SCST.pm
index 891c8bdfc..1041e0351 100644
--- a/scstadmin/scst-0.9.00/lib/SCST/SCST.pm
+++ b/scstadmin/scst-0.9.00/lib/SCST/SCST.pm
@@ -741,8 +741,8 @@ sub driverIsVirtualCapable {
 
 	my $io = new IO::File $path, O_WRONLY;
 
-	return TRUE if (!$io);
-	return FALSE;
+	return FALSE if (!defined($io));
+	return TRUE;
 }
 
 sub targetType {