]> git.donarmstrong.com Git - lilypond.git/commitdiff
* mf/GNUmakefile ($(NCSB_TTFS)): revise rule. Create
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Sun, 1 Jan 2006 20:19:52 +0000 (20:19 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Sun, 1 Jan 2006 20:19:52 +0000 (20:19 +0000)
<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.

ChangeLog
GNUmakefile.in
buildscripts/pfx2ttf.fontforge
lily/lily-guile.cc
lily/main.cc
lily/program-option.cc
mf/GNUmakefile
scm/lily.scm

index da1c4f63e481979fb97ae3fc5952262bf3c2cbbf..93b1772d7bc599cbccbc5fb78e158933e55603a6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 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.
index 5617475a681a9763d9dc92daf438c39f8e4d5312..332676d2c2589431fec2e8a947ac802a4bd738ef 100644 (file)
@@ -163,7 +163,7 @@ $(tree-share-prefix)/lilypond-force link-tree: GNUmakefile
 $(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 && \
index 914d1d1e7cd9182d5d86026b939fcd50caff40f0..dc1eb58723c7396fc60fcb9d6db56913a801954b 100644 (file)
@@ -2,5 +2,5 @@
 
 Open($1);
 MergeKern($2)
-Generate($3);
+Generate($3 + $fontname + ".ttf");
 
index 5211af49c22d73d1c49966f7c752555c7e7f115e..4a9366110a9b6e75613fd5988400f5216b0d130c 100644 (file)
@@ -196,7 +196,12 @@ ly_init_ly_module (void *)
     (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"));
 }
index a6756fc3cea3459d2272f1d2231769a8bb955e81..4bbf7cf93989ed08bc319c45eeb3bc0f5eee4e47 100644 (file)
@@ -387,8 +387,6 @@ main_with_guile (void *, int, char **)
 
   ly_c_init_guile ();
   call_constructors ();
-  ly_set_option (ly_symbol2scm ("verbose"), scm_from_bool (be_verbose_global));
-
   init_global_tweak_registry ();
   init_fontconfig ();
 
index 2963fe32c87810c3711dc59eb98a31e43d6eba96..cd3b857818ed6e9416917ccce4136b9d775a8347 100644 (file)
@@ -189,6 +189,12 @@ LY_DEFINE (ly_set_option, "ly:set-option", 1, 1, 0, (SCM var, SCM val),
   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.")
 {
index a56e3c4710bdbdffba9afc5211e2d5646bac3202..92586b0f20b51c904a75d1d4d77074beb0360af6 100644 (file)
@@ -34,8 +34,8 @@ FETA_FONTS = $(FETA_MF_FILES:.mf=)
 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
 
@@ -177,14 +177,16 @@ INSTALLATION_OUT_FILES9=$(SVG_FILES)
 
 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 ""
@@ -254,8 +256,7 @@ local-uninstall:
        -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
index ed56afc11dc0bdb82769d057e236a51026092ca1..961f87c62cf981d62c04e3968106866f79ca7f31 100644 (file)
@@ -31,7 +31,7 @@ similar to chord syntax")
              (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
@@ -353,7 +353,7 @@ The syntax is the same as `define*-public'."
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (define-public (lilypond-main files)
   "Entry point for LilyPond."
-
+  
   (define (no-files-handler)
     (ly:usage)
     (exit 2))
@@ -375,9 +375,12 @@ The syntax is the same as `define*-public'."
          (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)
@@ -404,6 +407,7 @@ The syntax is the same as `define*-public'."
        (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