- Properly detect when SCST isn't loaded.

git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@2969 d57e44dd-8a1f-0410-8b47-8ef2f437770f
This commit is contained in:
Mark Buechler
2010-12-07 17:49:15 +00:00
parent 42e623f994
commit faa2e13cb6

View File

@@ -225,8 +225,8 @@ sub new {
my $scstVersion = $self->scstVersion();
die("Failed to obtain SCST version information. Is the scst module loaded?\n")
if ($scstVersion == -1);
die("Failed to obtain SCST version information. Are the SCST modules loaded?\n")
if (!defined($scstVersion));
my($major, $minor, $release) = split(/\./, $scstVersion, 3);
($release, undef) = split(/\-/, $release) if ($release =~ /\-/);