home *** CD-ROM | disk | FTP | other *** search
- #!/usr/bin/perl
-
- use File::Path;
- use File::Spec;
-
- ########################################################
- my $PLISTBUDDY = $ARGV[0] . "/Contents/Resources/PlistBuddy";
- my $TOKENSPLIST = $ARGV[2] . "/Library/Receipts/iSync.pkg/Contents/tokens.plist";
- ########################################################
-
- my $PFSHELLSCRIPT = $ARGV[0] . "/Contents/Resources/postflight-cleanup";
- system($PFSHELLSCRIPT, $ARGV[0], $ARGV[1], $ARGV[2]);
-
- my $command = "\"" . $PLISTBUDDY . "\" -c \"Print :isync\" " . $TOKENSPLIST . "|";
-
- open(PSOUT, $command);
- chomp(my $ISYNC = <PSOUT>);
- close(PSOUT);
-
- my $ISYNCPATH = File::Spec->canonpath($ISYNC);
- my @PATHARRAY = File::Spec->splitdir($ISYNCPATH);
- pop @PATHARRAY;
- my $PARENTDIR = File::Spec->catdir(@PATHARRAY);
-
- ########################################################
-
- my $ISYNC_RESOURCES = $ISYNCPATH . "/Contents/Resources/";
- my $NIB1 = "/DotMacReset.nib/keyedobjects.nib";
- my $NIB2 = "/Preferences.nib/keyedobjects.nib";
-
- unlink $ISYNC_RESOURCES . "Dutch.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "English.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "French.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "German.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "Italian.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "Japanese.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "Spanish.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "da.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "fi.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "ko.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "no.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "pt.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "sv.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "zh_CN.lproj" . $NIB1;
- unlink $ISYNC_RESOURCES . "zh_TW.lproj" . $NIB1;
-
- unlink $ISYNC_RESOURCES . "Dutch.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "English.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "French.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "German.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "Italian.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "Japanese.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "Spanish.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "da.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "fi.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "ko.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "no.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "pt.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "sv.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "zh_CN.lproj" . $NIB2;
- unlink $ISYNC_RESOURCES . "zh_TW.lproj" . $NIB2;
-
-
- ####################################################################################################
- system("/usr/bin/touch", "-c", $ISYNCPATH);
- system("/usr/bin/touch", "-c", $PARENTDIR);
-
- exit(0);