Michael Schröder
758b6dc022
new patch: perl-gdbm-test-no-mmap.diff - fix perl no longer setting $^X if /proc is not mounted new patch: perl-revert-caretx.diff OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=173
11 lines
442 B
Diff
11 lines
442 B
Diff
--- ./ext/GDBM_File/t/fatal.t.orig 2018-09-28 14:01:52.697941391 +0000
|
|
+++ ./ext/GDBM_File/t/fatal.t 2018-09-28 14:02:35.601833563 +0000
|
|
@@ -29,6 +29,7 @@ is((open $fh, "<&=$fileno"), undef,
|
|
umask(0);
|
|
my %h;
|
|
isa_ok(tie(%h, 'GDBM_File', 'Op_dbmx', GDBM_WRCREAT, 0640), 'GDBM_File');
|
|
+tied(%h)->setopt(7, 0, length(pack("i", 0))); # turn off mmap mode
|
|
|
|
isnt((open $fh, "<&=$fileno"), undef, "dup fileno $fileno")
|
|
or diag("\$! = $!");
|