debian/0000755000000000000000000000000011732236132007166 5ustar debian/fonts-mona.docs0000644000000000000000000000003011732220103012101 0ustar README.ascii README.euc debian/fonts-mona.preinst0000644000000000000000000000163111732220103012645 0ustar #!/bin/sh set -e PKG="ttf-mona" PKG_VERSION="2.90-5" rm_conffile() { PKGNAME="$1" CONFFILE="$2" if [ -e "$CONFFILE" ]; then md5sum="`md5sum \"$CONFFILE\" | sed -e \"s/ .*//\"`" old_md5sum="`dpkg-query -W -f='${Conffiles}' $PKGNAME | sed -n -e \"\\\\' $CONFFILE'{s/ obsolete$//;s/.* //p}\"`" if [ "$md5sum" != "$old_md5sum" ]; then echo "Obsolete conffile $CONFFILE has been modified by you." echo "Saving as $CONFFILE.dpkg-bak ..." mv -f "$CONFFILE" "$CONFFILE".dpkg-bak else echo "Removing obsolete conffile $CONFFILE ..." rm -f "$CONFFILE" fi fi } case "$1" in install|upgrade) if dpkg --compare-versions "$2" lt-nl "$PKG_VERSION"; then FILE="/etc/defoma/hints/${PKG}.hints" if [ -f $FILE ]; then if [ -x /usr/bin/defoma-font ]; then defoma-font purge-all $FILE || true fi fi rm_conffile $PKG $FILE fi esac #DEBHELPER# exit 0 debian/fonts-mona.postinst0000644000000000000000000000222311732227377013066 0ustar #! /bin/sh set -e # font alternatives ALT_NAME_OLD="ttf-japanese-gothic" ALT_NAME="fonts-japanese-gothic" FONT_ENTRY="/usr/share/fonts/truetype/mona/mona.ttf" FONT_PRIORITY=20 remove_old_alternate_font_entry() { # remove old 'ttf-japanese-mincho' alternatives if [ -f /usr/share/fonts/truetype/$ALT_NAME_OLD ]; then rm -rf /usr/share/fonts/truetype/$ALT_NAME_OLD fi # remove old 'ttf-japanese-mincho.ttf' alternatives if [ -f /usr/share/fonts/truetype/$ALT_NAME_OLD.ttf ]; then update-alternatives --remove $ALT_NAME_OLD.ttf $FONT_ENTRY fi } add_alternate_font_entry() { update-alternatives --install \ /usr/share/fonts/truetype/$ALT_NAME.ttf \ $ALT_NAME.ttf \ $FONT_ENTRY \ $FONT_PRIORITY } case "$1" in configure) # alternatives remove_old_alternate_font_entry add_alternate_font_entry ;; abort-upgrade|abort-remove|abort-deconfigure) ;; *) echo "postinst called with unknown argument \`$1'" >&2 exit 1 ;; esac # dh_installdeb will replace this with shell code automatically # generated by other debhelper scripts. #DEBHELPER# exit 0 debian/fonts-mona.dirs0000644000000000000000000000006511732220103012122 0ustar usr/share/fonts/truetype/mona usr/share/doc/ttf-mona debian/copyright0000644000000000000000000000103311732220103011105 0ustar This package was debianized by NOKUBI Takatsugu on Mon, 19 Mar 2001 17:54:29 +0900. Package Maintainers: Nobuhiro Iwamatsu from Mon, 22 Nov 2006 19:32:27 +0900 NOKUBI Takatsugu from Mon, 19 Mar 2001 17:54:29 +0900 Upstream Website: http://monafont.sourceforge.net/index-e.html It was downloaded from Upstream Authors(s): Anonymous Copyright: Public Domain. debian/source/0000755000000000000000000000000011732220126010462 5ustar debian/source/format0000644000000000000000000000001411732220126011670 0ustar 3.0 (quilt) debian/compat0000644000000000000000000000000211732224133010362 0ustar 9 debian/xfonts-mona.docs0000644000000000000000000000003011732220103012271 0ustar README.ascii README.euc debian/control0000644000000000000000000000201111732233432010563 0ustar Source: xfonts-mona Section: fonts Priority: optional Maintainer: Nobuhiro Iwamatsu Build-Depends: debhelper (>= 9) Build-Depends-Indep: ttf-kochi-gothic, bzip2, xfonts-utils Standards-Version: 3.9.3 Package: xfonts-mona Architecture: all Depends: ${misc:Depends} Description: Proportional X fonts for 2ch ASCII art These fonts are suitable for some ASCII arts like mona, gikoneko and so on. This package provides BDF (Bitmap Description / Display Format) font. Package: fonts-mona Architecture: all Depends: ${misc:Depends} Provides: ttf-japanese-gothic Conflicts: ttf-mona (<< 2.90-7) Replaces: ttf-mona (<< 2.90-7) Description: Japanese TrueType font for 2ch ASCII art These fonts are suitable for some ASCII arts like mona, gikoneko and so on. This package provides TrueType font. Package: ttf-mona Depends: fonts-mona, ${misc:Depends} Architecture: all Priority: extra Section: oldlibs Description: Transitional dummy package This package is a dummy transitional package. It can be safely removed. debian/changelog0000644000000000000000000001043211732234774011052 0ustar xfonts-mona (2.90-7) unstable; urgency=low * Update debian/control. - Bump up Standards-Version to 3.9.3. - Update version of debhelper to (>= 9). - Remove dpatch from Build-Depends. * Update patch format to quilt. * Fix build with perl 5.12. (Closes: #628362) - Add patches/fix_build_perl5.12.patch. * Update debian/rules. - Change to using dh. * Update debian/compat to 9. * Update debian/ttf-mona.prerm and postinst. - Changte to prefix from ttf- to fonts-. * Add fonts-mona package. * Set Priority: extra and Section: oldlibs to ttf-mona. -- Nobuhiro Iwamatsu Wed, 21 Mar 2012 09:27:05 +0900 xfonts-mona (2.90-6) unstable; urgency=low * Remove debian/defoma and debian/rules. (Closes: #571026) * Remove function to install defoma from debian/rules and ttf-mona.prerm. (Closes: #572115). -- Nobuhiro Iwamatsu Tue, 02 Mar 2010 23:18:37 +0900 xfonts-mona (2.90-5) unstable; urgency=low * Update debian/control. - Remove defoma hints files and dependency on defoma. - Bump up Standards-Version. * Update debian/ttf-mona.postinst * Add debian/ttf-mona.preinst -- Nobuhiro Iwamatsu Mon, 01 Feb 2010 22:54:43 +0900 xfonts-mona (2.90-4) unstable; urgency=low * Fix problem that package can't uninstall. (Closes: #550791) Thanks to YOSHINO Yoshihito. -- Nobuhiro Iwamatsu Tue, 13 Oct 2009 09:12:53 +0900 xfonts-mona (2.90-3) unstable; urgency=low * Change maintainer mail address. * Update Standards-Version. * Update hints file. Add CIDSupplement = 0 line * Fix some lintian's warning. - Add README.source * Update URL of project homepage in debian/copyright. (Closes: #530370) -- Nobuhiro Iwamatsu Mon, 14 Sep 2009 17:04:37 +0900 xfonts-mona (2.90-2) unstable; urgency=low * Change Maintainer mail address. * Fix lack of dependency for bdftopcf. (Closes: #413486) -- Nobuhiro Iwamatsu Thu, 8 Mar 2007 23:42:39 +0900 xfonts-mona (2.90-1) unstable; urgency=low * New Maintainer (Nobuhiro Iwamatsu). * create ttf-mona pacakge. (Closes: #183027) * Fix fonts transition (xfonts-mona). (Closes: #362390) * New upstream release. (Closes: #321034) -- Nobuhiro Iwamatsu Sat, 25 Nov 2006 22:38:43 +0900 xfonts-mona (2.21-4) unstable; urgency=low * Changed font path to new X package. -- NOKUBI Takatsugu Fri, 14 Apr 2006 05:18:32 +0000 xfonts-mona (2.21-3) unstable; urgency=low * Added build-depends field, closes: #253772. -- NOKUBI Takatsugu Fri, 11 Jun 2004 17:03:18 +0900 xfonts-mona (2.21-2) unstable; urgency=low * Create dist directory on build target, closes: #165182. -- NOKUBI Takatsugu Wed, 6 Nov 2002 13:30:02 +0900 xfonts-mona (2.21-1) unstable; urgency=low * New upstream release. -- NOKUBI Takatsugu Tue, 25 Jun 2002 12:00:46 +0900 xfonts-mona (2.11-1) unstable; urgency=low * New upstream release -- NOKUBI Takatsugu Sat, 23 Mar 2002 15:42:14 +0900 xfonts-mona (2.04-1) unstable; urgency=low * New upstream release -- NOKUBI Takatsugu Tue, 12 Feb 2002 13:58:28 +0900 xfonts-mona (2.03-2) unstable; urgency=low * Adapted to new debian policy. -- NOKUBI Takatsugu Tue, 13 Nov 2001 19:29:29 +0900 xfonts-mona (2.03-1) unstable; urgency=low * New upstream release -- NOKUBI Takatsugu Mon, 16 Jul 2001 12:49:58 +0900 xfonts-mona (2.02-1) unstable; urgency=low * New upstream release -- NOKUBI Takatsugu Tue, 19 Jun 2001 15:01:21 +0900 xfonts-mona (2.01-1) unstable; urgency=low * New upstream release -- NOKUBI Takatsugu Mon, 18 Jun 2001 17:56:03 +0900 xfonts-mona (0.0.20010323-1) unstable; urgency=low * New upstream release -- NOKUBI Takatsugu Wed, 4 Apr 2001 10:43:10 +0900 xfonts-mona (0.0.20010213-2) unstable; urgency=low * Adapted to woody. -- NOKUBI Takatsugu Mon, 2 Apr 2001 15:46:44 +0900 xfonts-mona (0.0.20010213-1) unstable; urgency=low * Initial Release. -- NOKUBI Takatsugu Mon, 19 Mar 2001 17:54:29 +0900 debian/fonts-mona.prerm0000644000000000000000000000116711732227176012333 0ustar #! /bin/sh set -e # font alternatives ALT_NAME_OLD="ttf-japanese-gothic" ALT_NAME="fonts-japanese-gothic" FONT_ENTRY="/usr/share/fonts/truetype/mona/mona.ttf" remove_alternate_font_entry() { update-alternatives --remove $ALT_NAME.ttf $FONT_ENTRY } case "$1" in upgrade|deconfigure) ;; remove) # alternative remove_alternate_font_entry ;; failed-upgrade) ;; *) echo "prerm called with unknown argument \`$1'" >&2 exit 1 ;; esac # dh_installdeb will replace this with shell code automatically # generated by other debhelper scripts. #DEBHELPER# exit 0 debian/rules0000755000000000000000000000124011732230626010245 0ustar #!/usr/bin/make -f %: dh $@ override_dh_auto_build: -mkdir dist make bdf (cd dist; for i in *.bdf; do bdftopcf $$i|gzip -c9 > `basename $$i .bdf`.pcf.gz; done) make -C ttfsrc override_dh_auto_install: # Add here commands to install the package into debian/tmp. cp dist/*.pcf.gz `pwd`/debian/xfonts-mona/usr/share/fonts/X11/misc # ttf copy mkdir -p `pwd`/debian/fonts-mona/usr/share/fonts/truetype/mona/. install -m 644 ttfsrc/mona.ttf \ `pwd`/debian/fonts-mona/usr/share/fonts/truetype/mona/ #gzip -9 `pwd`/debian/xfonts-mona/usr/X11R6/lib/X11/fonts/misc/*.pcf override_dh_auto_clean: make clean -C ttfsrc make clean -rm -f dist/* dh_auto_clean debian/README.source0000644000000000000000000000030211732220103011327 0ustar This package uses the dpatch system of patch handling. See /usr/share/doc/dpatch/README.source.gz for more details. -- Nobuhiro Iwamatsu Wed, 09 Sep 2009 20:10:07 +0900 debian/patches/0000755000000000000000000000000011732225377010626 5ustar debian/patches/fix_build_perl5.12.patch0000644000000000000000000001232511732225243015137 0ustar Description: Fix Build with Perl 5.12 Forwarded: https://sourceforge.net/tracker/?func=detail&aid=3509536&group_id=55807&atid=478326 Author: Nobuhiro Iwamatsu Last-Update: 2012-03-21 diff --git a/ttftools/jis2ascii b/ttftools/jis2ascii index b8a241a..b5db91d 100755 --- a/ttftools/jis2ascii +++ b/ttftools/jis2ascii @@ -11,7 +11,7 @@ while(<>) { chop; - split(/\s+/); - my $x = eval($_[0]); - printf "0x%04x\t%d\n", $x, $_[1] if ($x < 256); + @split_data = split(/\s+/); + my $x = eval($split_data[0]); + printf "0x%04x\t%d\n", $x, $split_data[1] if ($x < 256); } diff --git a/ttftools/jis2sjis b/ttftools/jis2sjis index 1766fa2..ccd29b9 100755 --- a/ttftools/jis2sjis +++ b/ttftools/jis2sjis @@ -11,8 +11,8 @@ while(<>) { chop; - split(/\s+/); - my $x = eval($_[0]); + @split_data = split(/\s+/); + my $x = eval($split_data[0]); if (256 <= $x) { # not optimized for readers' convenience. my $c = (int($x / 256) - 0x21) * (0x7e-0x21+1) + (($x % 256) - 0x21); diff --git a/ttftools/jis2unicode b/ttftools/jis2unicode index c50bd68..ffdebc4 100755 --- a/ttftools/jis2unicode +++ b/ttftools/jis2unicode @@ -8061,12 +8061,12 @@ if ($ARGV[0] eq '-c') { } else { while(<>) { chop; - split(/\s+/); - $x = $map{jis2sjis(eval($_[0]))}; + @split_data = split(/\s+/); + $x = $map{jis2sjis(eval($split_data[0]))}; if ($x) { - printf "0x%04x\t%d\n", $x, $_[1]; + printf "0x%04x\t%d\n", $x, $split_data[1]; } else { - print STDERR "jis2unicode: warning: undefined mapping: $_[0]\n"; + print STDERR "jis2unicode: warning: undefined mapping: $split_data[0]\n"; } } } diff --git a/ttftools/lib_form.pl b/ttftools/lib_form.pl index 89993ea..95c220e 100644 --- a/ttftools/lib_form.pl +++ b/ttftools/lib_form.pl @@ -18,12 +18,12 @@ sub define_form($) { foreach $_ (split("\n", $_[0])) { my $c; $c = $1 if (s/(\#.*)$//); - split(/\s+/); - if (2 <= @_) { - push(@form_fields, $_[1]); + @split_data = split(/\s+/); + if (2 <= @split_data) { + push(@form_fields, $split_data[1]); push(@form_comments, $c); - $_[1] =~ tr/A-Z/a-z/; - $form_types{$_[1]} = $_[0]; + @split_data[1] =~ tr/A-Z/a-z/; + $form_types{$split_data[1]} = $split_data[0]; } } 1; @@ -101,9 +101,9 @@ sub make_form($@) { open(IN, $ff) || die("open: $ff: $!"); %form_val = (); while($_ = getline(IN)) { - split(/\s+/); - next if (@_ < 2); - make_field1(@_); + @split_data = split(/\s+/); + next if (@split_data < 2); + make_field1(@split_data); } close(IN); foreach my $x (@extra) { diff --git a/ttftools/make_EBSC b/ttftools/make_EBSC index d17e9ff..eed0fc9 100755 --- a/ttftools/make_EBSC +++ b/ttftools/make_EBSC @@ -28,8 +28,8 @@ $ARGV[0] || usage(); open(IN, $ARGV[0]) || die("open: $ARGV[0]: $!"); %metric = (); while($_ = getline(IN)) { - split(/:\s+/); - $metric{$_[0]} = eval($_[1]); + @split_data = split(/:\s+/); + $metric{$split_data[0]} = eval($split_data[1]); if ($metric{'ppem'} && $metric{'subst'} && $metric{'ascender'} && $metric{'descender'} && $metric{'widmax'}) { push(@sizes, [ $metric{'ppem'}, diff --git a/ttftools/make_cmap b/ttftools/make_cmap index 7a58cd0..46074a5 100755 --- a/ttftools/make_cmap +++ b/ttftools/make_cmap @@ -46,8 +46,8 @@ sub readenc($) { @enc = (); open(IN, $_[0]) || die("open: $_[0]: $!"); while($_ = getline(IN)) { - split(/\s+/); - $enc[eval($_[0])] = eval($_[1]); + @split_data = split(/\s+/); + $enc[eval($split_data[0])] = eval($split_data[1]); } close(IN); } diff --git a/ttftools/merge_glyf b/ttftools/merge_glyf index a486425..f20de66 100755 --- a/ttftools/merge_glyf +++ b/ttftools/merge_glyf @@ -76,7 +76,7 @@ for($mrg = 0; ; $mrg++) { open(IN, $cmap) || die("open: $src_cmap: $!"); while() { chop; - if (!/^\s*\#/) { split; $cmap_table{$_[0]} = $_[1]; } + if (!/^\s*\#/) { @split_data = split() ; $cmap_table{$split_data[0]} = $split_data[1]; } } close(IN); diff --git a/ttftools/pickchars b/ttftools/pickchars index 7e05c59..2a6bd6d 100755 --- a/ttftools/pickchars +++ b/ttftools/pickchars @@ -49,8 +49,8 @@ sub font1 { $f=shift(@ARGV); open(IN, $f) || die("open: $f: $!"); while($_ = getline(IN)) { - split(/\s+/); - $enc{eval($_[0])} = 1; + @split_data = split(/\s+/); + $enc{eval($split_data[0])} = 1; } close(IN); diff --git a/ttftools/remap_glyf b/ttftools/remap_glyf index 9aee8f8..4df417e 100755 --- a/ttftools/remap_glyf +++ b/ttftools/remap_glyf @@ -65,7 +65,7 @@ open(IN, $src_cmap) || die("open: $src_cmap: $!"); while() { chop; # $src_glyfnum is a mapping from CHARACTER_CODE to GLYPH_NUMBER in the source font. - if (!/^\s*\#/) { split; $src_glyfnum{$_[0]} = $_[1]; } + if (!/^\s*\#/) { @split_data = split; $src_glyfnum{$split_data[0]} = $split_data[1]; } } close(IN); @@ -79,8 +79,8 @@ while() { chop; if (!/^\s*\#/) { # $dest_charnum is a mapping from GLYPH_NUMBER to CHARACTER_CODE in the dest font. - split; $dest_charnum{$_[1]} = $_[0]; - $max_dest_glyfnum = $_[1] if ($max_dest_glyfnum < $_[1]); + @split_data = split; $dest_charnum{$split_data[1]} = $split_data[0]; + $max_dest_glyfnum = $split_data[1] if ($max_dest_glyfnum < $split_data[1]); } } close(IN); debian/patches/series0000644000000000000000000000007211732221114012023 0ustar fix_kochigothic_fonts_path.patch fix_build_perl5.12.patch debian/patches/fix_kochigothic_fonts_path.patch0000644000000000000000000000111111732225377017227 0ustar Description: Fix ttfsrc's kochigothic path. Forwarded: Does not need. Author: Nobuhiro Iwamatsu Last-Update: 2012-03-21 --- a/ttfsrc/Makefile 2003-09-10 11:54:11.000000000 +0900 +++ b/ttfsrc/Makefile 2006-11-26 14:38:57.000000000 +0900 @@ -33,7 +33,8 @@ # modify this: #BASE_OUTLINE_TTF=/usr/share/fonts/ja/TrueType/kochi-gothic.ttf # for RedHat -BASE_OUTLINE_TTF=/src/kochi-substitute/kochi-gothic-subst.ttf +BASE_OUTLINE_TTF=/usr/share/fonts/truetype/kochi/kochi-gothic-subst.ttf + MONA_OUTLINE_TTF=mona-outline.ttf TTFPACK=$(PERL) $(TTFTOOLS)/ttfpack debian/xfonts-mona.dirs0000644000000000000000000000003111732220103012303 0ustar usr/share/fonts/X11/misc