| line |
true |
false |
branch |
|
128
|
0 |
0 |
if (-e Cwd::cwd() . $env{'PathSeparator'} . '.wrangler.json') |
|
134
|
0 |
0 |
unless ($path) |
|
136
|
0 |
0 |
if $path |
|
137
|
0 |
0 |
if ($path) |
|
143
|
0 |
0 |
unless ($path) |
|
145
|
0 |
0 |
if ($env{'HostOS'} eq 'Linux') { } |
|
|
0 |
0 |
elsif ($env{'HostOS'} eq 'Windows') { } |
|
|
0 |
0 |
elsif ($env{'HostOS'} eq 'Mac') { } |
|
154
|
0 |
0 |
if ($path) |
|
160
|
0 |
0 |
if ($path and -f $path) { } |
|
162
|
0 |
0 |
unless my $json = path($path)->slurp_utf8 |
|
164
|
0 |
0 |
if $@ |
|
175
|
0 |
0 |
unless $settings{'ui.main.width'} and $settings{'ui.main.width'} > 30 |
|
176
|
0 |
0 |
unless $settings{'ui.main.height'} and $settings{'ui.main.height'} > 30 |
|
177
|
0 |
0 |
unless $settings{'ui.filebrowser.columns'} |
|
181
|
0 |
0 |
if ($_[1]) |
|
182
|
0 |
0 |
unless (defined $settings{$_[1]}) |
|
184
|
0 |
0 |
unless $_[2] |
|
186
|
0 |
0 |
unless $_[2] |
|
194
|
0 |
0 |
unless ($digest) |
|
199
|
0 |
0 |
if (Digest::MD5::md5(Data::Dumper::Dumper(\%settings)) eq $digest) { } |
|
203
|
0 |
0 |
if ($env{'config.file.location'} eq 'working-dir') { } |
|
207
|
0 |
0 |
unless (-d $path) |
|
208
|
0 |
0 |
unless mkdir $path |
|
211
|
0 |
0 |
unless (-d $path) |
|
212
|
0 |
0 |
unless mkdir $path |
|
220
|
0 |
0 |
if $@ |
|
222
|
0 |
0 |
unless path($path)->spew_utf8($json) |