c9c2bdc4f5
so there's no checksum file. I changed the following from the PR submission: @ Removed files/ dir completely, all it contained was an empty md5 file and author's comments (keep that on your machine please :) @ Added "/usr/bin/perl" in front of pkg/INSTALL in post-install, so it will work even if the user doesn't get the file over a permission- preserving medium (e.g., ftp) @ I think that's all. PR: 8188 (part) Submitted by: sada@e-mail.ne.jp
23 lines
542 B
Perl
23 lines
542 B
Perl
#!/usr/bin/perl
|
|
$prefix = $ENV{'PKG_PREFIX'};
|
|
$dir = "$prefix/lib/X11/fonts/misc";
|
|
$to = "$dir/fonts.alias";
|
|
$from = "$to.orig";
|
|
rename($to, $from) || die("Can't rename: $!");
|
|
open(IN, $from) || die("Can't open $from: $!");
|
|
open(OUT, ">$to") || die("Can't open $to: $!");
|
|
while (<IN>) {
|
|
chop;
|
|
if (/^\s*!/ || /^\s*$/) {
|
|
print OUT "$_\n";
|
|
}
|
|
else {
|
|
@line = split(/\s+/, $_);
|
|
@elm = split(/-+/, $line[0]);
|
|
if ($elm[1] ne 'netscape' && $elm[1] ne 'netscape.k10') {
|
|
print OUT "$_\n";
|
|
}
|
|
}
|
|
}
|
|
#system("$prefix/bin/xset fp rehash");
|