diff options
Diffstat (limited to 'community/perl-db_file-lock/fix-bug-98224-test-fails.patch')
| -rw-r--r-- | community/perl-db_file-lock/fix-bug-98224-test-fails.patch | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/community/perl-db_file-lock/fix-bug-98224-test-fails.patch b/community/perl-db_file-lock/fix-bug-98224-test-fails.patch new file mode 100644 index 0000000000..40a9adf9b2 --- /dev/null +++ b/community/perl-db_file-lock/fix-bug-98224-test-fails.patch @@ -0,0 +1,16 @@ +diff --git a/test.pl b/test.pl +old mode 100644 +new mode 100755 +index 92ebcf6..cba6da6 +--- a/test.pl ++++ b/test.pl +@@ -81,7 +81,7 @@ if ( not defined $pid ) { + sleep(1); + $TEST_NUM += 2; + report_result( not tie %hash3, 'DB_File::Lock', $file1, O_RDWR, 0600, $DB_HASH, $nonblock_write ); +- report_result( not defined %hash3 ); # double check and satisfy -w about %hash3 ++ report_result( not keys %hash3 ); # double check and satisfy -w about %hash3 + $TEST_NUM += 1; + report_result( wait() == $pid ); + report_result( tie %hash3, 'DB_File::Lock', $file1, O_RDWR, 0600, $DB_HASH, $nonblock_write ); +-- |