Remove redundant code, increase readability
This commit is contained in:
parent
a2f9168671
commit
5f6e19e26d
@ -9,15 +9,17 @@ if [[ "$OSTYPE" == darwin* ]]; then
|
|||||||
# Perl is slow; cache its output.
|
# Perl is slow; cache its output.
|
||||||
cache_file="${0:h}/cache.zsh"
|
cache_file="${0:h}/cache.zsh"
|
||||||
perl_path="$HOME/Library/Perl/5.12"
|
perl_path="$HOME/Library/Perl/5.12"
|
||||||
|
|
||||||
if [[ -f "$perl_path/lib/perl5/local/lib.pm" ]]; then
|
if [[ -f "$perl_path/lib/perl5/local/lib.pm" ]]; then
|
||||||
manpath=("$perl_path/man" $manpath)
|
manpath=("$perl_path/man" $manpath)
|
||||||
|
|
||||||
if [[ ! -s "$cache_file" ]]; then
|
if [[ ! -s "$cache_file" ]]; then
|
||||||
perl -I$perl_path/lib/perl5 -Mlocal::lib=$perl_path >! "$cache_file"
|
perl -I$perl_path/lib/perl5 -Mlocal::lib=$perl_path >! "$cache_file"
|
||||||
source "$cache_file"
|
fi
|
||||||
else
|
|
||||||
source "$cache_file"
|
source "$cache_file"
|
||||||
fi
|
fi
|
||||||
fi
|
|
||||||
unset perl_path
|
unset perl_path
|
||||||
unset cache_file
|
unset cache_file
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user