diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-05-30 04:48:41 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-05-30 04:48:41 -0500 |
commit | fb9b17bd52b48a7eea32585e0f743a887a61c7d7 (patch) | |
tree | d0fa26b6fc197584d941e8d7aef478b8b294826a /bin/reply | |
parent | d8a90a03e9c5e8e2732374a10e0e79289ffb793c (diff) | |
download | reply-fb9b17bd52b48a7eea32585e0f743a887a61c7d7.tar.gz reply-fb9b17bd52b48a7eea32585e0f743a887a61c7d7.zip |
find the configuration in a cross-platform way
Diffstat (limited to 'bin/reply')
-rw-r--r-- | bin/reply | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -3,9 +3,12 @@ use strict; use warnings; # PODNAME: reply +use File::HomeDir; +use File::Spec; + use Reply; -my $cfg = "$ENV{HOME}/.replyrc"; +my $cfg = File::Spec->catfile(File::HomeDir->my_home, ".replyrc"); my %args = (config => $cfg); if (!-e $cfg) { |