Fixed a path transversal problem.
Some checks failed
Test CloudVista on Ubuntu Latest / test (push) Has been cancelled

This commit is contained in:
Benjamin
2026-04-08 20:07:06 -04:00
parent 9f1781b524
commit f9cae511af

View File

@@ -112,6 +112,7 @@ sub safe_name {
my $n = basename(shift || '');
$n =~ s/[^\w.\-]/_/g;
$n =~ s/^\./dot_/;
$n =~ s!/!_!g;
return length($n) ? $n : 'file';
}