]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-tex.scm
*** empty log message ***
[lilypond.git] / scm / output-tex.scm
index 7f9b5b432aaff0ca4b19c2883041ab475a82ee06..baee6e7f2d68f40939ddb56929198e438e3b0500 100644 (file)
@@ -24,7 +24,6 @@
            blank
            circle
            dot
-           white-dot
            beam
            dashed-slur
            named-glyph
@@ -37,7 +36,6 @@
            filledbox
            round-filled-box
            text
-           white-text
            setcolor
            resetcolor
            polygon
@@ -82,9 +80,6 @@
 (define (embedded-ps string)
   (embedded-ps (list 'embedded-ps string)))
 
-(define (white-dot x y radius)
-  (embedded-ps (list 'white-dot x y radius)))
-
 (define (beam width slope thick blot)
   (embedded-ps (list 'beam  width slope thick blot)))
 
    "\\hbox{\\~a{}~a}" (tex-font-command font)
    (sanitize-tex-string s)))
 
-(define (white-text scale s)
-  (embedded-ps (list 'white-text scale s)))
-
 (define (setcolor r g b)
   (string-append "\\color[rgb]{"
   (number->string r) ", "