Chris/webperl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Allow '0' to appear as a path fragment

Browse Source
This commit is contained in:
Chris 2017-01-06 11:23:35 +00:00
parent 1263fa2f1f
commit b2d16ed738
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Webperl/Utils.pm
View File

@ -67,7 +67,7 @@ sub path_join {
$bit =~ s|^/*||; $bit =~ s|/*$||; $bit =~ s|^/*||; $bit =~ s|/*$||;
# If the fragment was nothing more than slashes, ignore it # If the fragment was nothing more than slashes, ignore it
next unless($bit); next unless($bit =~ /\S/);
# Store for joining # Store for joining
push(@parts, $bit); push(@parts, $bit);