.lib/perl5/ReplyStartup.pm

changeset 690
d005acd0e883
parent 683
ea343e7d3abc
child 691
5e08af1add1e
--- a/.lib/perl5/ReplyStartup.pm
+++ b/.lib/perl5/ReplyStartup.pm
@@ -11,7 +11,7 @@ sub import {
 
       use Path::Tiny;
 
-      -e \$_ && do(\$_) for "\$ENV{HOME}/.replyrc.local.pl";
+      -e \$_ && do(\$_) for glob('~/.replyrc.local.pl');
       die \$@ if \$@;
     }
 END_PERL

mercurial