* buildscripts/gen-emmentaler-scripts.py (i): generate

[lilypond.git] / scm / lily-library.scm

diff --git a/scm/lily-library.scm b/scm/lily-library.scm
index b7dfacfd43b517db09ae7ce42b606169aea3721c..277d0f7a7cb3530969baaf5d8b754f3f97b86fdf 100644 (file)
--- a/scm/lily-library.scm
+++ b/scm/lily-library.scm
@@ -336,39 +336,6 @@ possibly turned off."
     (debugf "design:~S\n" designsize)
     scaling))
 
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(define-public (ps-embed-cff body font-set-name version)
-  (let* ((binary-data
-         (string-append
-          (format "/~a ~s StartData " font-set-name (string-length body))
-          body))
-
-        (header
-         (format
-          "%%BeginResource: font ~a
-%!PS-Adobe-3.0 Resource-FontSet
-%%DocumentNeededResources: ProcSet (FontSetInit)
-%%Title: (FontSet/~a)
-%%Version: ~s
-%%EndComments
-%%IncludeResource: ProcSet (FontSetInit)
-%%BeginResource: FontSet (~a)
-/FontSetInit /ProcSet findresource begin
-%%BeginData: ~s Binary Bytes
-"
-          font-set-name font-set-name version font-set-name
-          (string-length binary-data)))
-        (footer "\n%%EndData
-%%EndResource
-%%EOF
-%%EndResource\n"))
-
-    (string-append
-     header
-     binary-data
-     footer)))
-
 (define-public (version-not-seen-message)
   (ly:warn
    (format #f