From bf5a0e0be6c7c9d15779cd1f9c9f5e45bc216ca5 Mon Sep 17 00:00:00 2001 From: fred Date: Sun, 24 Mar 2002 20:08:15 +0000 Subject: [PATCH] lilypond-1.0.1 --- debian/README.Debian | 58 ++++++---- debian/TODO | 3 + debian/postinst | 246 +++---------------------------------------- debian/postrm | 38 +++---- 4 files changed, 71 insertions(+), 274 deletions(-) diff --git a/debian/README.Debian b/debian/README.Debian index ba5d98e908..320703b028 100644 --- a/debian/README.Debian +++ b/debian/README.Debian @@ -1,22 +1,40 @@ -lilypond for DEBIAN +lilypond for Debian ------------------- -Starting with version 0.1.12, LilyPond comes with some new MF fonts. -These fonts are not currently listed in /usr/lib/texmf/fontname/special.map -(from the teTeX package), therefore the fonts will be created in a -non-standard directory somewhere under /var/spool/texmf. The problem is -usually only aesthetic. TeTeX can create and find the *.tfm and *.pk files -without any problems. - -However, if you experience any font problems (such as the note heads -not showing up, characters in the wrong places, error messages from -TeX), especially after upgrading to a new version of LilyPond, you may -need to delete the relevant *.tfm and *.pk files under the directory -/var/spool/texmf. You may also file a bug report about this if you -like. - -LilyPond is still in active development, and many things may still change. -When it is stablized in the future, these new fonts will probably be -added into the standard special.map file. - -Anthony Fok , Thu, 23 Oct 1997 16:59:32 -0600 +Dear music lover: + + Welcome to the wonderful world of music typesetting! ^_^ + This is the Debian package of GNU LilyPond. + Hope you enjoy producing beautiful music scores with GNU LilyPond + and other related packages! ^_^ + + +Old LilyPond Fonts Issue: +~~~~~~~~~~~~~~~~~~~~~~~~~ + + If you installed the lilypond_0.1.48-1 or previous versions of the + Debian GNU LilyPond package, please note the following: + + LilyPond comes with its own MF fonts starting with version 0.1.12. + + The old lilypond fonts were not listed in + /usr/lib/texmf/fontname/special.map (from the teTeX 0.4 package), + therefore the fonts were created in a non-standard directory + somewhere under /var/spool/texmf. The problem was usually only + aesthetic. TeTeX could create and find the *.tfm and *.pk files + without any problems. + + However, if you experience any font problems (such as the note + heads not showing up, characters in the wrong places, error + messages from TeX), especially after upgrading to a new version of + LilyPond, you may need to delete the relevant *.tfm and *.pk files + under the directory /var/spool/texmf. You may also file a bug + report about this if you like. + + Nonetheless, GNU LilyPond now comes with the standard "feta" fonts, + and they are already listed in the latest teTeX 0.9 / Web2C 7.2 + /usr/lib/texmf/fontname/special.map file, so there shouldn't be any + more problems! Enjoy! :-) + + +Anthony Fok , Wed, 22 Apr 1998 03:37:00 -0600 diff --git a/debian/TODO b/debian/TODO index 8a5f21bd28..25818fbb82 100644 --- a/debian/TODO +++ b/debian/TODO @@ -2,3 +2,6 @@ Fri, 6 Feb 1998 17:24:49 -0700: * Compile mudela-mode.el into mudela-mode.elc * Install /etc/emacs/site-start.d/50lilypond.el * Figure out how to make mudela-mode work on my computer. :-) + +Sun, 26 Apr 1998 21:11:32 -0600: + * Remove preinst from upstream source diff --git a/debian/postinst b/debian/postinst index ddcc40e520..e7f9906b71 100644 --- a/debian/postinst +++ b/debian/postinst @@ -1,244 +1,26 @@ -#!/usr/bin/perl -w +#!/bin/sh # # postinst script for the Debian GNU/Linux lilypond package # # by Anthony Fok # Initial release: Sun, 26 Oct 1997 03:23:00 -0700 -# Last modified: Mon, 5 Jan 1998 18:36:51 -0700 +# Last modified: Wed, 22 Apr 1998 03:14:10 -0600 -use strict; -use File::Copy; +set -e -my ($package, $pkg_name, $font_supplier, $font_typeface, $std_TEXMF, $TEXMF, - $TEXINPUTS, $MFINPUTS, $TFMFONTS, @fonts); +package=lilypond # This is used for filenames! Don't change it! +pkg_name="GNU LilyPond" -sub correct_opus_fonts ($$); -sub check_texmfcnf (); -sub run_texhash (); -sub add_fonts ($$$$@); -sub check_specialmap (); +std_TEXMFMAIN=/usr/lib/texmf # Debian's standard $TEXMFMAIN -$| = 1; +TEXMFMAIN=`/usr/bin/kpsewhich -expand-var '$TEXMFMAIN'` +: ${TEXMFMAIN:=$std_TEXMFMAIN} +echo " Running /usr/bin/mktexlsr ..." +/usr/bin/mktexlsr -####################### -# Variables -####################### - -$package = "lilypond"; # This is used for filenames! Don't change it! -$pkg_name = "GNU LilyPond"; - -$font_supplier = "public"; -$font_typeface = "lilypond"; -@fonts = qw( feta ); - -$std_TEXMF = "/usr/lib/texmf"; # Debian's standard $TEXMF -$TEXINPUTS = "$std_TEXMF/tex/$package//"; -$MFINPUTS = "$std_TEXMF/fonts/source/$font_supplier/$font_typeface//"; -$TFMFONTS = "$std_TEXMF/fonts/tfm/$font_supplier/$font_typeface//"; - - -####################### -# Subroutine -####################### - -#----- Fix Opus font entries in special.map (called by check_specialmap()) --- -# I goofed up the Opus font entries in special.map, hence this fix. -# Note: This is a temporary fix. Consider removing this in 1998. ^_^ - -sub correct_opus_fonts ($$) { - my $specialmap = $_[1]; - my $supplier = "opustex"; - my $typeface = "opus"; - my @opusfonts = qw( opus opusline opusnum opussps osl ); - my $font = ""; - my $entries = ""; - - if ($_[0] =~ /(^\w+\s+public\s+$typeface\n)+/m) { - print " Correcting old font entries ..."; - foreach $font (@opusfonts) { - if (length($font) < 8) { $font .= "\t"; } - $entries .= "$font\t$supplier\t\t$typeface\n"; - } - - ($_[0] =~ s/(^\w+\s+public\s+$typeface\n)+/$entries/m) - or die " Can't correct font entries in $specialmap: $!"; - - system(": \${MAKETEXDIR=$TEXMF/maketex}; " . - "test -r \$MAKETEXDIR/maketex.site && . \$MAKETEXDIR/maketex.site; " . - ": \${MT_DESTROOT=$TEXMF/fonts}; " . - "rm -rf \$MT_DESTROOT/pk/*/public/$typeface"); - - print "\n"; - return 1; - } else { - return 0; - } -} - -#-------------------- Check/Modify texmf.cnf for custom teTeX installation --- -# Edit texmf.cnf to add search path /usr/lib/texmf -# for non-Debian teTeX installation - -sub check_texmfcnf () { - my $texmfcnf; - - print "\n You have a custom teTeX installation in $TEXMF.\n"; - - chop($texmfcnf = `kpsewhich cnf texmf.cnf`); - - if ($? == 0 and $texmfcnf ne "") { - my($filebuf, $line); - my $new = "$texmfcnf.new"; - my $bak = "$texmfcnf.bak"; - - open(OLD, "< $texmfcnf") or die " Can't open $texmfcnf for reading: $!"; - - undef $/; - if ($filebuf = ) { - if ($filebuf =~ /^(TEXMFL.*)$/m) { - $line = $1; - if ($line =~ /TEXMFL\s*=.*$std_TEXMF/) { - print " Found $std_TEXMF in \$TEXMFL. Leaving $texmfcnf untouched.\n"; - } else { - print " Adding $std_TEXMF to \$TEXMFL, updating $texmfcnf ..."; - - $filebuf =~ s/^(TEXMFL\s*=\s*\S*)/$1,$std_TEXMF/m; - open(NEW, "> $new") or die "\n Can't open $new for writing: $!"; - (print NEW $filebuf) or die "\n Can't write to $new: $!"; - close(NEW); - copy($texmfcnf, $bak) or die "\n Can't backup $texmfcnf: $!"; - rename($new, $texmfcnf) - or ( copy($new, $texmfcnf), unlink($new) ) - or die "\n Can't update $texmfcnf: $!"; - print " done.\n"; - } - } - } else { - warn " **\n"; - warn " ** Can't read from $texmfcnf: $!\n"; - warn " ** Please verify the content of $texmfcnf!\n"; - warn " **\n"; - } - $/ = "\n"; - close(OLD); - } else { - warn " **\n"; - warn " ** Can't find texmf.cnf!\n"; - warn " ** Please add $std_TEXMF to \$TEXMFL in your texmf.cnf.\n"; - warn " **\n"; - } -} - -#------------------------------------------------------------- Run texhash --- - -sub run_texhash () { - print " Running texhash to update $TEXMF/ls-R ...\n"; - - if ( `which texhash` and -e "$TEXMF/ls-R" ) { - system("texhash"); - } else { - warn " Error: texhash or $TEXMF/ls-R not found!\n"; - } - print "\n"; -} - -#---------- Add font entries to special.map (called by check_specialmap()) --- - -sub add_fonts ($$$$@) { - my ($specialmap, $supplier, $typeface, $fonts) = @_[1..4]; - my $font = ""; - my $entries = ""; - foreach $font (@fonts) { - if (length($font) < 8) { $font .= "\t"; } - $entries .= "$font\t$supplier\t\t$typeface\n"; - } - - $_[0] =~ /((^\w+\s+$supplier\s+$typeface\n)+)/m; - - if ($1 ne $entries) { - ($_[0] =~ s/(^\w+\s+$supplier\s+$typeface\n)+/$entries/m) - or ($_[0] =~ s/(?=^beam\s+public\s+music\n)/$entries/m) - or die " Can't add font entries to $specialmap: $!"; - return 1; - } else { - return 0; - } -} - -#---------------------------------- Check special.map and add font entries --- - -sub check_specialmap () { - my $fontmap; - my $specialmap = "$TEXMF/fontname/special.map"; - my $new = "$specialmap.new"; - my $bak = "$specialmap.bak"; - - print " Checking font entries in $specialmap ...\n"; - - open(OLD, "< $specialmap") or die " Can't open $specialmap for reading: $!"; - undef $/; - if ($fontmap = ) { - if (correct_opus_fonts($fontmap, $specialmap) | - add_fonts($fontmap, $specialmap, $font_supplier, $font_typeface, @fonts)) - { - print " Adding $pkg_name font entries to $specialmap ...\n"; - open(NEW, "> $new") or die " Can't open $new for writing: $!"; - (print NEW $fontmap) or die " Can't write to $new: $!"; - close(NEW); - copy($specialmap, $bak) or die " Can't backup $specialmap: $!"; - rename($new, $specialmap) - or ( copy($new, $specialmap), unlink($new) ) - or die " Can't update $specialmap: $!"; - } else { - print " Entries okay. Leaving $specialmap untouched.\n"; - } - undef $fontmap; - } else { - warn " **\n"; - warn " ** Can't read from $specialmap: $!\n"; - warn " ** Please verify the content of $specialmap!\n"; - warn " **\n"; - } - $/ = "\n"; - close(OLD); - print "\n"; -} - - - -####################### -# Main program -####################### - -print " Checking teTeX directory \$TEXMF ..."; - -chop($TEXMF = `kpsetool -v '\$TEXMF'`); - -if ($? == 0 and $TEXMF ne "") { - print " okay."; -} else { - warn "\n Error: kpsetool not found or \$TEXMF not set!\n"; - warn " Assuming \$TEXMF=$std_TEXMF\n"; - $TEXMF = $std_TEXMF; - if (not -d $TEXMF) { - warn " ... but directory '$TEXMF' does not exist either!\n"; - die " Please check your teTeX configuration.\n" - } -} - -if ($TEXMF ne $std_TEXMF) { - check_texmfcnf(); -} - -print "\n"; - -run_texhash(); -check_specialmap(); - -print " $pkg_name configuration completed.\n"; -print " Please read /usr/doc/$package/README.Debian to get started.\n"; - -print << `EOF` #DEBHELPER# -EOF + +echo +echo " $pkg_name configuration completed." +echo " Please read /usr/doc/$package/README.Debian to get started." diff --git a/debian/postrm b/debian/postrm index e3d606b1e6..e0dd95cfbc 100644 --- a/debian/postrm +++ b/debian/postrm @@ -4,52 +4,46 @@ # by Anthony Fok # This is free software; see the GNU General Public Licence # version 2 or later for copying conditions. There is NO warranty. -# Last modified: Mon, 5 Jan 1998 18:38:11 -0700 +# Last modified: Wed, 22 Apr 1998 05:55:58 -0600 set -e package=lilypond font_supplier=public font_typeface=lilypond -std_TEXMF=/usr/lib/texmf +std_TEXMFMAIN=/usr/lib/texmf +std_VARTEXFONTS=/var/spool/texmf #DEBHELPER# -if [ "`which kpsetool`" ]; then - TEXMF=`kpsetool -v '$TEXMF'` -fi -: ${TEXMF:=$std_TEXMF} - +TEXMFMAIN=`/usr/bin/kpsewhich -expand-var '$TEXMFMAIN'` +: ${TEXMFMAIN:=$std_TEXMFMAIN} +VARTEXFONTS=`/usr/bin/kpsewhich -expand-var '$VARTEXFONTS'` +: ${VARTEXFONTS=$std_VARTEXFONTS} case "$1" in remove) - if [ "`kpsetool -w tex lilyponddefs.tex 2>/dev/null`" -a "`which texhash`" ]; then - texhash - fi + /usr/bin/mktexlsr ;; upgrade) # Clear out the old TFM and PK files in case the fonts were modified - : ${MAKETEXDIR=$TEXMF/maketex} - test -r $MAKETEXDIR/maketex.site && . $MAKETEXDIR/maketex.site - : ${MT_DESTROOT=$TEXMF/fonts} - rm -rf $MT_DESTROOT/tfm/$font_supplier/$font_typeface - rm -rf $MT_DESTROOT/pk/*/$font_supplier/$font_typeface + rm -rf $VARTEXFONTS/tfm/$font_supplier/$font_typeface + rm -rf $VARTEXFONTS/pk/*/$font_supplier/$font_typeface ;; purge) - : ${MAKETEXDIR=$TEXMF/maketex} - test -r $MAKETEXDIR/maketex.site && . $MAKETEXDIR/maketex.site - : ${MT_DESTROOT=$TEXMF/fonts} - rm -rf $MT_DESTROOT/tfm/$font_supplier/$font_typeface - rm -rf $MT_DESTROOT/pk/*/$font_supplier/$font_typeface + # Clear out the old TFM and PK files in case the fonts were modified + rm -rf $VARTEXFONTS/tfm/$font_supplier/$font_typeface + rm -rf $VARTEXFONTS/pk/*/$font_supplier/$font_typeface + /usr/bin/mktexlsr ;; failed-upgrade|abort-install|abort-upgrade|disappear) ;; *) - echo "postrm called with unknown argument \`$1'" >&2 - exit 0 + echo "postrm called with unknown argument \`$1'" >&2 + exit 0 ;; esac -- 2.39.5