projects
/
xscreensaver
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
From http://www.jwz.org/xscreensaver/xscreensaver-5.37.tar.gz
[xscreensaver]
/
OSX
/
update-info-plist.pl
diff --git
a/OSX/update-info-plist.pl
b/OSX/update-info-plist.pl
index 72040c56924efd9bb9fc1ebfde413b0b5c8d9d6f..3e0fb8f5ee703f905c1e371d82e4e563b4eb3951 100755
(executable)
--- a/
OSX/update-info-plist.pl
+++ b/
OSX/update-info-plist.pl
@@
-1,5
+1,5
@@
#!/usr/bin/perl -w
#!/usr/bin/perl -w
-# Copyright © 2006-201
6
Jamie Zawinski <jwz@jwz.org>
+# Copyright © 2006-201
7
Jamie Zawinski <jwz@jwz.org>
#
# Permission to use, copy, modify, distribute, and sell this software and its
# documentation for any purpose is hereby granted without fee, provided that
#
# Permission to use, copy, modify, distribute, and sell this software and its
# documentation for any purpose is hereby granted without fee, provided that
@@
-27,7
+27,7
@@
use IO::Compress::Gzip qw(gzip $GzipError);
my ($exec_dir, $progname) = ($0 =~ m@^(.*?)/([^/]+)$@);
my ($exec_dir, $progname) = ($0 =~ m@^(.*?)/([^/]+)$@);
-my ($version) = ('$Revision: 1.4
6
$' =~ m/\s(\d[.\d]+)\s/s);
+my ($version) = ('$Revision: 1.4
7
$' =~ m/\s(\d[.\d]+)\s/s);
$ENV{PATH} = "/usr/local/bin:$ENV{PATH}"; # for seticon
$ENV{PATH} = "/opt/local/bin:$ENV{PATH}"; # for macports wget
$ENV{PATH} = "/usr/local/bin:$ENV{PATH}"; # for seticon
$ENV{PATH} = "/opt/local/bin:$ENV{PATH}"; # for macports wget
@@
-445,6
+445,9
@@
sub update($) {
"CFBundleLongVersionString",$copyright);
$plist = set_plist_key ($filename, $plist,
"CFBundleGetInfoString", $info_str);
"CFBundleLongVersionString",$copyright);
$plist = set_plist_key ($filename, $plist,
"CFBundleGetInfoString", $info_str);
+ $plist = set_plist_key ($filename, $plist,
+ "CFBundleIdentifier",
+ "org.jwz.xscreensaver." . $app_name);
if ($oplist eq $plist) {
print STDERR "$progname: $filename: unchanged\n" if ($verbose > 1);
if ($oplist eq $plist) {
print STDERR "$progname: $filename: unchanged\n" if ($verbose > 1);