replace deprecated spurt function with spew

Grinnz · Jun 14, 2024 · 14eb186 · 14eb186
1 parent dd06b9c
commit 14eb186
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/cpanfile b/cpanfile
@@ -11,7 +11,7 @@ requires 'List::Util' => '1.50';
 requires 'MetaCPAN::Pod::XHTML' => '0.003002';
 requires 'Module::Metadata';
 requires 'Module::Runtime';
-requires 'Mojolicious' => '9.16';
+requires 'Mojolicious' => '9.34';
 requires 'Mojo::Log::Role::Clearable';
 requires 'Perl::Build';
 requires 'Pod::Simple' => '3.40';

diff --git a/lib/PerldocBrowser/Plugin/PerldocInstall.pm b/lib/PerldocBrowser/Plugin/PerldocInstall.pm
@@ -167,7 +167,7 @@ sub _cache_perl_to_html ($c, $perl_version) {
     my $filename = sha1_sum(encode 'UTF-8', $pod) . '.html';
     print "Rendering $pod for $perl_version to $filename\n";
     my $dom = $c->app->prepare_perldoc_html(path($pod_paths{$pod})->slurp, $url_version, $pod);
-    $version_dir->child($filename)->spurt(encode 'UTF-8', $dom->to_string);
+    $version_dir->child($filename)->spew(encode 'UTF-8', $dom->to_string);
   }
 }