1 files changed, 22 insertions, 0 deletions

diff --git a/japanese/alias-fonts/pkg-deinstall b/japanese/alias-fonts/pkg-deinstall
new file mode 100644
index 000000000000..c1f89ca64df8
--- /dev/null
+++ b/japanese/alias-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");