From fb9b17bd52b48a7eea32585e0f743a887a61c7d7 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 30 May 2013 04:48:41 -0500 Subject: find the configuration in a cross-platform way --- bin/reply | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/bin/reply b/bin/reply index ddd03e2..569816e 100644 --- a/bin/reply +++ b/bin/reply @@ -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) { -- cgit v1.2.3-54-g00ecf