Homedir expansion should only happen if ~ is the first character

bestpractical · Sep 16, 2013 · 1f8d7b8 · 1f8d7b8
1 parent 9b4034c
commit 1f8d7b8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Config/GitLike.pm b/lib/Config/GitLike.pm
@@ -171,7 +171,7 @@ sub load_file {
     }
 
     # Do some canonicalization
-    $filename =~ s/~/$ENV{'HOME'}/g;
+    $filename =~ s/^~/$ENV{'HOME'}/g;
     $filename = File::Spec->rel2abs($filename);
 
     return $self->data if grep {$_ eq $filename} @{$self->config_files};