* lily/ttf.cc (print_trailer): use it.

[lilypond.git] / lily / pango-font.cc

diff --git a/lily/pango-font.cc b/lily/pango-font.cc
index 76ccfbc66d39ce2fbb20f1660a2e1d09a01a1999..6419187dbf018b47d809603b3de61313488280e2 100644 (file)
--- a/lily/pango-font.cc
+++ b/lily/pango-font.cc
@@ -88,6 +88,16 @@ Pango_font::get_index_to_charcode_map (string key, FT_Face face)
   return &charcode_maps_[key];
 }
 
+void
+get_unicode_name (char*s, FT_ULong code)
+{
+  if (code > 0xFFFF)
+    sprintf (s,  "u%06lX", char_code);
+  else
+    sprintf (s,  "uni%04lX", char_code);
+}
+
+
 Stencil
 Pango_font::pango_item_string_stencil (PangoItem const *item, string str) const
 {
@@ -147,9 +157,9 @@ Pango_font::pango_item_string_stencil (PangoItem const *item, string str) const
       if (glyph_name[0] == '\0' && cmap)
        {
          FT_ULong char_code = cmap->find (pg)->second;
-         
-         sprintf (glyph_name,  "uni%04lX", char_code);
+         get_unicode_name (glyph_name, char_code);
        }
+      
   
       if (glyph_name[0] == '\0')
        {