If a developer adds new glyphs to `mf/feta-noteheads.mf'
but doesn't document them in
`Documentation/included/font-table.ly', I'd like `make doc'
to fail with some message like:
Unlisted glyphs in Documentation/included/font-table.ly:
(noteheads.s2foo noteheads.s2bar)
I've attached a patch attempting this. Is this the proper
way to do it? Also, I haven't schemed for a while... is
there a simpler way of doing this:
(if (not (null? lst)) ...)
Thanks.
- Mark
From df9b6d3064aea660ef75a62e1818264771fd2644 Mon Sep 17 00:00:00 2001
From: Mark Polesky <markpole...@yahoo.com>
Date: Thu, 11 Mar 2010 13:50:09 -0800
Subject: [PATCH] Build: require all glyphs for `font-table.ly'.
---
Documentation/included/font-table.ly | 10 +++++-----
1 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/Documentation/included/font-table.ly b/Documentation/included/font-table.ly
index b14cbc4..f0c48dc 100644
--- a/Documentation/included/font-table.ly
+++ b/Documentation/included/font-table.ly
@@ -163,11 +163,11 @@
;;;;;;;;;
- ;; simple debug test for any glyphs that didn't make it.
- (if #f
- (if (null? glyph-list)
- (format #t "No glyphs are missing from the table.\n")
- (format #t "You missed these glyphs: ~a\n" glyph-list)))
+ ;; require all glyphs to appear here
+ (if (not (null? glyph-list))
+ (ly:error
+ (_ "Unlisted glyphs in Documentation/included/font-table.ly: ~A")
+ glyph-list))
) % end of (begin ...)
--
1.6.3.3
_______________________________________________
lilypond-devel mailing list
lilypond-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-devel
