* lily/lookup.cc (slur): Invoke bezier-bow.

[lilypond.git] / scm / pdftex.scm

diff --git a/scm/pdftex.scm b/scm/pdftex.scm
index 871841d81db3e2b4058c7ddf5b823537e803b1a3..f193a37ed7e0952a78bc4c3772a85845bf988582 100644 (file)
--- a/scm/pdftex.scm
+++ b/scm/pdftex.scm
@@ -184,6 +184,9 @@
    "\\placebox{"
    (number->dim y) "}{" (number->dim x) "}{" s "}\n"))
 
+(define (bezier-bow l thick)
+  (embedded-pdf (list 'bezier-bow  `(quote ,l) thick)))
+
 (define (bezier-sandwich l thick)
   (embedded-pdf (list 'bezier-sandwich  `(quote ,l) thick)))