]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/lookup.cc
release: 1.3.9
[lilypond.git] / lily / lookup.cc
index 35bdc323a3883c39e9e3a3d7f8123725dbb4f4b5..7f98f45965b1e7e33f48f72c155b898a0ee10b92 100644 (file)
@@ -448,18 +448,6 @@ Molecule
 Lookup::staff_brace (Real y, int staff_size) const
 {
   Molecule m;
-  /*
-    (define (pianobrace y staffht)
-    (let* ((step 1.0)
-    (minht (* 2 staffht))
-    (maxht (* 7 minht))
-    )
-    (string-append
-    (select-font (string-append "feta-braces" (number->string (inexact->exact staffht))) 0)
-    (char (max 0 (/  (- (min y (- maxht step)) minht) step))))
-    )
-    )
-  */
 
   Real step  = 1.0;
   int minht  = 2 * staff_size;