more test

Author: haarg

.gitignore

@@ -1,3 +1,4 @@
+!/root/assets/.gitignore
 *.bak
 *.sw*
 .DS_Store
@@ -17,8 +18,7 @@
 /node_modules/
 /perltidy.LOG
 /pm_to_blib
+/root/assets
 /root/static/sitemaps
 /tidyall.ERR
 /var
-/root/assets
-!/root/assets/.gitignore

lib/MetaCPAN/Middleware/Static.pm

@@ -6,7 +6,7 @@ use Plack::App::File         ();
 use JavaScript::Minifier::XS ();
 use Cwd                      qw( cwd );
 use Plack::MIME              ();
-use JSON::MaybeXS ();
+use JSON::MaybeXS            ();
 
 Plack::MIME->add_type(
     '.eot'   => 'application/vnd.ms-fontobject',
@@ -40,7 +40,7 @@ sub wrap {
     };
 
     my $assets;
-    if (!$dev_mode) {
+    if ( !$dev_mode ) {
         $assets = $get_assets->();
     }
 
@@ -101,11 +101,12 @@ sub wrap {
         mount '/assets' => sub {
             my $env = shift;
             my $res = $assets_app->($env);
-            push @{ $res->[1] }, (
+            push @{ $res->[1] },
+                (
                 'Cache-Control' => "public, max-age=${year_ttl}, immutable",
-                'Surrogate-Key'     => 'assets',
+                'Surrogate-Key' => 'assets',
                 'Surrogate-Control' => "max-age=${year_ttl}",
-            );
+                );
             return $res;
         };
 

t/tidyall.t

@@ -3,13 +3,27 @@
 use strict;
 use warnings;
 
-# This test is _really_ slow on Travis with Devel::Cover running.  Also,
+# This test is _really_ slow with Devel::Cover running.  Also,
 # there's really no reason to run this when coverage tests are running, since
 # it's not bringing anything to the table.
+use Test::More $ENV{COVERAGE}
+    ? ( skip_all => 'skip under Devel::Cover' )
+    : ();
+
+use File::Temp ();
 
 use Test::Code::TidyAll qw( tidyall_ok );
-use Test::More
-    do { $ENV{COVERAGE} ? ( skip_all => 'skip under Devel::Cover' ) : () };
-tidyall_ok( verbose => $ENV{TEST_TIDYALL_VERBOSE} );
+
+my %opts = ( verbose => $ENV{TEST_TIDYALL_VERBOSE}, );
+
+if ( -e '.tidyall.d' ? !-w _ : !-w '.' ) {
+    $opts{data_dir} = File::Temp::tempdir(
+        TEMPLATE => 'tidyall-XXXXXX',
+        TMPDIR   => 1,
+        CLEANUP  => 1,
+    );
+}
+
+tidyall_ok(%opts);
 
 done_testing();