Remove redundant code, increase readability

This commit is contained in:
Sorin Ionescu 2012-07-03 21:35:49 -04:00
parent a2f9168671
commit 5f6e19e26d

View File

@ -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"
else
source "$cache_file"
fi fi
source "$cache_file"
fi fi
unset perl_path unset perl_path
unset cache_file unset cache_file