<PostScriptName>.ttf instead of c059XXXttf.
* lily/program-option.cc (LY_DEFINE): special support for
--verbose, so it works before option init too.
* mf/GNUmakefile (local-install): oops.
* buildscripts/pfx2ttf.fontforge: new file.
* mf/GNUmakefile (NCSB_PATH): add vars for NCSB.
($(outdir)/%.ttf): new rule.
2006-01-01 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ * mf/GNUmakefile ($(NCSB_TTFS)): revise rule. Create
+ <PostScriptName>.ttf instead of c059XXXttf.
+
+ * lily/program-option.cc (LY_DEFINE): special support for
+ --verbose, so it works before option init too.
+
* mf/GNUmakefile (local-install): oops.
* lily/lyric-hyphen.cc (print): oops.
$(tree-share-prefix)/mf-link-tree link-mf-tree: $(tree-share-prefix)/lilypond-force
-rm -f $(tree-share-prefix)/fonts/{otf,svg,tfm,type1}/* && \
cd $(tree-share-prefix)/fonts/otf && \
- ln -s ../../../../../../mf/$(outconfbase)/*.otf .
+ ln -s ../../../../../../mf/$(outconfbase)/*.{otf,ttf} .
-cd $(tree-share-prefix)/fonts/svg && \
ln -s ../../../../../../mf/$(outconfbase)/*.svg .
-cd $(tree-share-prefix)/fonts/tfm && \
Open($1);
MergeKern($2)
-Generate($3);
+Generate($3 + $fontname + ".ttf");
(scm_init_funcs_->elem (i)) ();
if (be_verbose_global)
- progress_indication ("\n");
+ {
+ progress_indication ("[");
+ scm_display (scm_c_eval_string ("(%search-load-path \"lily.scm\")"),
+ scm_current_error_port ());
+ progress_indication ("]\n");
+ }
scm_primitive_load_path (scm_makfrom0str ("lily.scm"));
}
ly_c_init_guile ();
call_constructors ();
- ly_set_option (ly_symbol2scm ("verbose"), scm_from_bool (be_verbose_global));
-
init_global_tweak_registry ();
init_fontconfig ();
return SCM_UNSPECIFIED;
}
+LY_DEFINE (ly_command_line_verbose_p, "ly:command-line-verbose?", 0, 0, 0, (),
+ "Was be_verbose_global set?")
+{
+ return scm_from_bool (be_verbose_global);
+}
+
LY_DEFINE (ly_get_option, "ly:get-option", 1, 0, 0, (SCM var),
"Get a global option setting.")
{
SVG_FILES = $(OTF_FILES:%.otf=%.svg) $(ALL_FONTS:%=$(outdir)/%.svg)
-NCSB_FILES=c059013l c059016l c059033l c059036l
-NCSB_TTFS=$(addprefix $(outdir)/,$(addsuffix .ttf, $(NCSB_FILES)))
+NCSB_SOURCE_FILES=c059013l c059016l c059033l c059036l
+NCSB_TTFS=$(addprefix $(outdir)/,CenturySchL-Ital.ttf CenturySchL-BoldItal.ttf CenturySchL-Roma.ttf CenturySchL-Bold.ttf)
NCSB_PATH=/usr/share/fonts/default/Type1
NCSB_INSTALL_DIR=$(local_lilypond_datadir)/fonts/otf
export MFINPUTS:=.:$(MFINPUTS)
+
+
+default: pfa_warning $(ALL_GEN_FILES) $(outdir)/emmentaler-20.otf tree-regen
+
.PHONY: tree-regen
# FIXME: temporary hack: must regenerate after building fonts
tree-regen:
${MAKE} -C $(top-build-dir) link-mf-tree
-default: pfa_warning $(ALL_GEN_FILES) $(outdir)/emmentaler-20.otf tree-regen
-
pfa_warning:
ifneq ($(shell $(MFTRACE) --version | sed 's/ .*//'),mftrace)
@echo ""
-rmdir $(DESTDIR)$(local_lilypond_datadir)/dvips
-$(outdir)/%.ttf: $(NCSB_PATH)/%.pfb
- $(foreach i,$(NCSB_FILES), \
+$(NCSB_TTFS): $(addsuffix .pfb,$(addprefix $(NCSB_PATH)/,$(NCSB_SOURCE_FILES)))
+ $(foreach i,$(NCSB_SOURCE_FILES), \
$(FONTFORGE) -script $(buildscript-dir)/pfx2ttf.fontforge \
- $(NCSB_PATH)/$(i).pfb $(NCSB_PATH)/$(i).afm \
- $(outdir)/$(i).ttf && ) true
+ $(NCSB_PATH)/$(i).pfb $(NCSB_PATH)/$(i).afm $(outdir)/ && ) true
(gui #f "running from gui; redirect stderr to log file")
(delete-intermediate-files #f
"delete unusable PostScript files")
- (verbose #f "value for the --verbose flag")
+ (verbose (ly:command-line-verbose?) "value for the --verbose flag")
(ttf-verbosity 0
"how much verbosity for TTF font embedding?")
(debug-gc #f
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-public (lilypond-main files)
"Entry point for LilyPond."
-
+
(define (no-files-handler)
(ly:usage)
(exit 2))
(exit 0)))))
(define-public (lilypond-all files)
+
+ blablalblah
(let* ((failed '())
(handler (lambda (key failed-file)
(set! failed (append (list failed-file) failed)))))
+
(for-each
(lambda (x)
(lilypond-file handler x)
(ly:message (_ "Redirecting output to ~a...") log-name))
(ly:stderr-redirect log-name "w")
(ly:message "# -*-compilation-*-")
+
(let ((failed (lilypond-all files)))
(if (pair? failed)
(begin