diff options
author | Satoshi Asami <asami@FreeBSD.org> | 1998-10-09 04:09:45 +0000 |
---|---|---|
committer | Satoshi Asami <asami@FreeBSD.org> | 1998-10-09 04:09:45 +0000 |
commit | c9c2bdc4f50330d868749192147cbbf94bd0c524 (patch) | |
tree | 6a92c932148ee54e507327aebaeb75b69c83f4ab /japanese/netscape-fonts/pkg-deinstall | |
parent | df5822f3274f31c17762777a6d25f6c90f7e888d (diff) |
Font setup for Japanese netscape. Doesn't install anything itself,
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
Notes
Notes:
svn path=/head/; revision=13772
Diffstat (limited to 'japanese/netscape-fonts/pkg-deinstall')
-rw-r--r-- | japanese/netscape-fonts/pkg-deinstall | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/japanese/netscape-fonts/pkg-deinstall b/japanese/netscape-fonts/pkg-deinstall new file mode 100644 index 000000000000..c1f89ca64df8 --- /dev/null +++ b/japanese/netscape-fonts/pkg-deinstall @@ -0,0 +1,22 @@ +#!/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"); |