Commit 13dbb872d7a943505698fb93a79a0038c879990f
Repository
git://github.com/pfenwick/autodie.git
master
by
Craig A. Berry
on
2009-07-13 01:20
(5 months ago)
Flock-sniff on older VMS systems no longer causes flock.t to fail.
Hi Paul. I was doing a test core build on an older VMS system that does not
have flock. The flock.t test died with something like:
$ perl [-.lib.autodie.t]flock.t
The flock() function is unimplemented at [-.lib.autodie.t]flock.tline 26.
%SYSTEM-F-IVCHAN, invalid I/O channel
The attached patch puts the first flock call inside an eval so we bow out gracefully and get your
intended skip message:
$ perl [-.lib.autodie.t]flock.t
1..0 # SKIP flock on my own test not supported on this system.
You could also muck about without $Config{d_flock} and
$Config{d_fcntl_can_lock}, but this seems simpler.
Language Totals
| Language | Code Added | Code Removed | Comments Added | Comments Removed | Blanks Added | Blanks Removed | |
|---|---|---|---|---|---|---|---|
| Perl | 1 | 1 | 0 | 0 | 0 | 0 |
Files Changed
[2 total ]
| File | Language | Code Added | Code Removed | Comments Added | Comments Removed | Blanks Added | Blanks Removed |
|---|---|---|---|---|---|---|---|
Changes
|
|||||||
t/flock.t
|
|||||||
| Perl | 1 | 1 | 0 | 0 | 0 | 0 | |