vriska/hydra
0
0
Fork 0
forked from lix-project/hydra
Code Pull requests Activity

Merge pull request #1075 from DeterminateSystems/perlcritic-level-1

Browse source 
Perlcritic level 1
This commit is contained in:
Graham Christensen 2021-12-14 12:09:30 -05:00 committed by GitHub
parent cff387a027 e43f487157
commit a466d53d18
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
.perlcriticrc
View file

@ -1,4 +1,4 @@
theme = community theme = community
# 5 is the least complainy, 1 is the most complainy # 5 is the least complainy, 1 is the most complainy
severity = 2 severity = 1

2
src/lib/Hydra/Helper/Nix.pm
View file

@ -396,7 +396,7 @@ sub pathIsInsidePrefix {
# ‘..’ should not take us outside of the prefix. # ‘..’ should not take us outside of the prefix.
if ($c eq "..") { if ($c eq "..") {
return if length($cur) <= length($prefix); return undef if length($cur) <= length($prefix);
$cur =~ s/\/[^\/]*$// or die; # remove last component $cur =~ s/\/[^\/]*$// or die; # remove last component
next; next;
} }