[khrt#14] Avoid "dot in path" hickup

Do not interpret "." in path names as a file extension.
hidden-primary-net · Apr 28, 2021 · e609713 · e609713
1 parent 8c4b9d8
commit e609713
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/Raisin/Middleware/Formatter.pm b/lib/Raisin/Middleware/Formatter.pm
@@ -71,6 +71,8 @@ sub call {
 sub _accept_header_set { length(shift || '') }
 sub _path_has_extension {
     my $path = shift;
+    my $idx_last_slash = rindex $path, '/';
+    $path = $idx_last_slash >= 0 ? substr $path, $idx_last_slash : $path;
     my @chunks = split /\./, $path;
     scalar(@chunks) > 1;
 }