From 50310cb574238e274d47ce48c2d2394589644a23 Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Sun, 19 Dec 2004 11:49:53 +0000 Subject: [PATCH] (ALL_GEN_FILES): make SVG files too. --- ChangeLog | 4 ++++ mf/GNUmakefile | 4 ++-- mf/feta-accordion.mf | 4 +--- mf/parmesan-heads.mf | 1 - scm/output-ps.scm | 2 +- 5 files changed, 8 insertions(+), 7 deletions(-) diff --git a/ChangeLog b/ChangeLog index da956c5e86..9527acbcb9 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2004-12-19 Han-Wen Nienhuys + + * mf/GNUmakefile (ALL_GEN_FILES): make SVG files too. + 2004-12-19 Jan Nieuwenhuizen * scm/framework-svg.scm (dump-page): Implement landscape. diff --git a/mf/GNUmakefile b/mf/GNUmakefile index 9fd5bed79e..d198342b5a 100644 --- a/mf/GNUmakefile +++ b/mf/GNUmakefile @@ -78,7 +78,7 @@ PFB_FILES = $(PFA_FILES:%.pfa=%.pfb) # Make tfm files first, log files last, # so that normally log files aren't made twice -ALL_GEN_FILES= $(TFM_FILES) $(TEXTABLES) $(TFM_FILES) $(LOG_FILES) $(ENC_FILES) $(LISP_FILES) $(FETA_LIST_FILES) $(OTF_TABLES) $(PFA_FILES) $(outdir)/lilypond.map $(outdir)/fonts.scale $(outdir)/Fontmap.lily $(OTF_FILES) +ALL_GEN_FILES= $(TFM_FILES) $(TEXTABLES) $(TFM_FILES) $(LOG_FILES) $(ENC_FILES) $(LISP_FILES) $(FETA_LIST_FILES) $(OTF_TABLES) $(PFA_FILES) $(outdir)/lilypond.map $(outdir)/fonts.scale $(outdir)/Fontmap.lily $(OTF_FILES) $(SVG_FILES) #PRE_INSTALL=$(MAKE) "$(ALL_GEN_FILES)" INSTALLATION_DIR=$(local_lilypond_datadir)/fonts/source @@ -202,7 +202,7 @@ fontdir: $(addprefix $(outdir)/, lilypond.map lilypond.sfd private-fonts fonts.s $(outdir)/lilypond.map: $(AFM_FILES) - for i in $(FETA_FONTS); do echo $$i $$i'<'$$i.pfa; done > $@ + for i in $(FETA_FONTS); do echo $$i $$i '<'$$i.pfa; done > $@ local-clean: diff --git a/mf/feta-accordion.mf b/mf/feta-accordion.mf index 713c04fc84..ec3c470df3 100644 --- a/mf/feta-accordion.mf +++ b/mf/feta-accordion.mf @@ -126,7 +126,7 @@ def def_S(expr w, h) = bue=z2{left}..z1{up}; numeric t; t:=xpart(bue intersectiontimes(z8l--z7l)); - show t; +% show t; bueoverst=z6{right}..z7{down}; enddef; @@ -159,8 +159,6 @@ enddef; %%% strange turning path. fet_beginchar("accOldEE", "accOldEE") set_char_box(staff_space#, staff_space#, 0, 2staff_space#); - show w; - show h; r = staff_space; lr = .4 staff_space - linethickness; ir = .6 staff_space; diff --git a/mf/parmesan-heads.mf b/mf/parmesan-heads.mf index e425f16ced..b8bc59c407 100644 --- a/mf/parmesan-heads.mf +++ b/mf/parmesan-heads.mf @@ -83,7 +83,6 @@ def draw_neomensural_brevis(expr brevwid) = -- z4l -- z4r -- z3r{left} .. z2r{up} -- cycle; addto currentpicture also currentpicture yscaled -1; - show z4r; show z4l; addto currentpicture also currentpicture shifted (-x4r,0) xscaled -1 shifted (x4l,0); diff --git a/scm/output-ps.scm b/scm/output-ps.scm index a6b13dc079..2f585a767e 100644 --- a/scm/output-ps.scm +++ b/scm/output-ps.scm @@ -275,7 +275,7 @@ (define text new-text) (define (white-text scale s) - (let ((mystring (string-append "(" s ") " (number->string scale) " /Helvetica-bold " + (let ((mystring (string-append "(" s ") " (number->string scale) " /Helvetica-Bold " " draw_white_text"))) mystring)) -- 2.39.2