mirrors/scst
1
0
Fork 0
mirror of https://github.com/SCST-project/scst.git synced 2026-05-14 01:01:27 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merged revisions 6768-6769 via svnmerge from

Browse Source 
svn+ssh://svn.code.sf.net/p/scst/svn/trunk

........
  r6768 | bvassche | 2015-12-18 12:05:20 +0100 (Fri, 18 Dec 2015) | 1 line
  
  scstadmin: Suppress warnings about the use of an undefined value in numeric ne (!=)
........
  r6769 | bvassche | 2015-12-18 12:39:19 +0100 (Fri, 18 Dec 2015) | 1 line
  
  scst regression test 7: Fix $redirect_file initialization
........


git-svn-id: http://svn.code.sf.net/p/scst/svn/branches/3.1.x@6770 d57e44dd-8a1f-0410-8b47-8ef2f437770f
This commit is contained in:
Bart Van Assche
2015-12-18 11:45:33 +00:00
parent ec034324f4
commit 876e5a4195
2 changed files with 5 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
scstadmin/scstadmin.sysfs/scst-1.0.0/lib/SCST/SCST.pm
View File

@@ -929,7 +929,7 @@ sub driverExists {
opendir($dHandle, make_path(SCST_TARGETS_DIR(), $driver));
close $dHandle if ($result);
return $result;
return $result ? TRUE : FALSE;
}
sub driverDynamicAttributes {

9
scstadmin/scstadmin.sysfs/scst-1.0.0/t/07-scstadmin-args.t
View File

@@ -7,17 +7,16 @@ use File::Spec;
use Test;
my $testdir;
my $scstadmin_pm_dir;
my $scstadmin_dir;
my $scstadmin;
my $redirect_file = "/tmp/07-output.txt";
my $redirect_file;
my $redirect;
BEGIN {
$redirect_file = "/tmp/07-output.txt";
unlink($redirect_file);
$testdir = dirname(abs_path($0));
$scstadmin_pm_dir = dirname($testdir);
$scstadmin_dir = dirname($scstadmin_pm_dir);
my $scstadmin_pm_dir = dirname($testdir);
my $scstadmin_dir = dirname($scstadmin_pm_dir);
$scstadmin = File::Spec->catfile($scstadmin_dir, "scstadmin");
unless(grep /blib/, @INC) {
unshift(@INC, File::Spec->catdir($scstadmin_pm_dir, "lib"));