#! /bin/sh
# Fri Feb 26 2010
# Created by fubaya - http://a-common-hades.blogspot.com/2010/01/simpler-language-pack-deletion-script.html
if [ `id -u` != 0 ]; then echo "Oops, you need to be root to run this script"; exit 0; fi
echo "Deleting all languages except English."
echo "Please wait..."
updatedb && locate lproj | grep -E lproj$ | grep -v -i English | grep -v -i \/en > .deletelist_fubaya
while read file; do rm -rf "$file"; done < .deletelist_fubaya
num=$(cat .deletelist_fubaya | wc -l)
rm .deletelist_fubaya
echo 
echo "$num language pack directories deleted"
exit 0;
fi
# end of script