diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-10 17:10:07 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-10 17:10:07 -0700 |
commit | c6098bd1ac24723cae4872dc096d7a6e33bef0df (patch) | |
tree | e4a21af99dd33fc8ba8c430ff7a3ef4cfc935989 /perl5 | |
parent | 648401be374717f963becd46e8ce90abb26333fe (diff) | |
download | dotfiles-c6098bd1ac24723cae4872dc096d7a6e33bef0df.tar.gz |
readability
Diffstat (limited to 'perl5')
-rw-r--r-- | perl5/Local/Homedir.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl5/Local/Homedir.pm b/perl5/Local/Homedir.pm index ffc5cd69..148c6e17 100644 --- a/perl5/Local/Homedir.pm +++ b/perl5/Local/Homedir.pm @@ -36,7 +36,7 @@ sub normalise_mrconfig { my $master = $ENV{HOME} . "/src/dotfiles/.mrconfig.in"; my $target = $ENV{HOME} . "/.mrconfig"; - unlink $target if (-e $target && !-f $target); + unlink $target if -e $target and not -f $target; my %master_blocks = blocks_from_file($master); my %target_blocks = -f $target ? blocks_from_file($target) : (); |