Gets rid of oval stencil command

[lilypond.git] / scm / output-ps.scm

diff --git a/scm/output-ps.scm b/scm/output-ps.scm
index 48b7f7a3f30d2c1c9427aaba9a0531594ada0511..8c8e853567f4851cae95d8a3da82c798813562a6 100644 (file)
--- a/scm/output-ps.scm
+++ b/scm/output-ps.scm
@@ -195,14 +195,6 @@
 (define (no-origin)
   "")
 
-(define (oval x-radius y-radius thick fill)
-  (ly:format
-   "~a ~4f ~4f ~4f draw_oval"
-   (if fill
-     "true"
-     "false")
-   x-radius y-radius thick))
-
 (define (placebox x y s)
   (if (not (string-null? s))
       (ly:format "~4f ~4f moveto ~a\n" x y s)