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

Merge branch 'svn-trunk' into master

Browse Source
This commit is contained in:
Bart Van Assche
2020-09-14 19:45:36 -07:00
parent 15ca9935fd 4023bdadbd
commit dbeb45d02a
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -494,7 +494,11 @@ sub setScstAttribute {
return TRUE if (!length($attribute) || !defined($value));
my $bytes = -ENOENT;
# There is a space between the unary minus sign and ENOENT because
# without that space older Perl versions report the following warning:
# Ambiguous use of -ENOENT resolved as -&ENOENT() at
# /usr/share/perl5/vendor_perl/SCST/SCST.pm line 497.
my $bytes = - ENOENT;
my $path = make_path(SCST_ROOT_DIR(), $attribute);
my $io = new IO::File $path, O_WRONLY;
if ($io) {