Aegisub/scripts/osx-dmg-dsstore.pl
Amar Takhar c4e8dd0dfb * Remove DS_Store, it is now custom generated using
http://freehg.org/u/wiml/dsstore/.  This allows us to have versions in our
  folder names without requiring manual intervention!  It requires dsstore to b$
  installed and runs a modified scripts/osx-dmg-dsstore.pl to generate the
  DS_Store file.

Originally committed to SVN as r2568.
2008-12-30 11:38:08 +00:00

20 lines
619 B
Perl
Executable file

#!/usr/bin/perl -w
use Mac::Finder::DSStore qw( writeDSDBEntries makeEntries );
use Mac::Memory qw( );
use Mac::Files qw( NewAliasMinimal );
&writeDSDBEntries("$ARGV[0]",
&makeEntries(".",
BKGD_alias => NewAliasMinimal("$ARGV[2]"),
ICVO => 1,
fwi0_flds => [ 308, 397, 658, 848, "icnv", 0, 0 ],
fwvh => 350,
icgo => "\0\0\0\0\0\0\0\0",
icvo => pack('A4 n A4 A4 n*', "icv4", 90, "none", "botm", 0, 0, 0, 0, 0, 1, 0, 100, 1),
icvt => 12
),
&makeEntries("Applications", Iloc_xy => [ 133, 250 ]),
&makeEntries("$ARGV[1]", Iloc_xy => [ 133, 55 ])
);