#!/usr/bin/perl

########################################################
# Get rid of themes. We install new themes.
use File::Path;

rmtree("/Applications/Keynote.app/Contents/Resources/English.lproj/Themes");
rmtree("/Applications/Keynote.app/Contents/Resources/Themes");

########################################################

exit(0);
