dragonfly BSD's default filesystem is mounted noatime by default

diff --git a/dist/Time-HiRes/t/utime.t b/dist/Time-HiRes/t/utime.t
index e2399b8..34519b3 100644 (file)
--- a/dist/Time-HiRes/t/utime.t
+++ b/dist/Time-HiRes/t/utime.t
@@ -135,6 +135,7 @@ if ($^O eq 'cygwin') {
 print "# \$^O = $^O, atime = $atime, mtime = $mtime\n";
 
 my $skip_atime = $^O eq 'netbsd' && tempfile_has_noatime_mount();
+$skip_atime = 1 if $^O eq 'dragonfly'; # noatime by default
 
 if ($skip_atime) {
     printf("# Skipping atime tests because tempfiles seem to be in a filesystem mounted with 'noatime' ($^O)\n'");

diff --git a/t/io/fs.t b/t/io/fs.t
index 90bcc31..a36fbe8 100644 (file)
--- a/t/io/fs.t
+++ b/t/io/fs.t
@@ -500,7 +500,7 @@ sub check_utime_result {
         else {
             # Operating systems whose filesystems may be mounted with the noatime option
             # RT 132663
-            my %noatime_oses = map { $_ => 1 } ( qw| haiku netbsd | );
+            my %noatime_oses = map { $_ => 1 } ( qw| haiku netbsd dragonfly | );
             if ($^O =~ /\blinux\b/i) {
                 note("# Maybe stat() cannot get the correct atime, ".
                     "as happens via NFS on linux?");