From 1ee197e6300c8f91c736177224dab6a11a7b4bdc Mon Sep 17 00:00:00 2001 From: Mikhail Gubin Date: Fri, 23 Jul 2021 10:59:21 +0300 Subject: [PATCH] Fix for Windows --- lib/Mojolicious/Plugin/MultiConfig.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Mojolicious/Plugin/MultiConfig.pm b/lib/Mojolicious/Plugin/MultiConfig.pm index 6d0d168..7284e0e 100755 --- a/lib/Mojolicious/Plugin/MultiConfig.pm +++ b/lib/Mojolicious/Plugin/MultiConfig.pm @@ -96,7 +96,8 @@ sub register my $app = shift; my $arg = shift; my $config = {}; - my $username = (getpwuid($<))[0]; # TODO: Not on Windows! + eval { $username = ( getpwuid ($<) )[0]; }; # Not on Windows! + $username ||= $ENV{USERNAME}; my @files; # Default args if not set