release: 1.3.19

[lilypond.git] / lily / span-bar.cc

diff --git a/lily/span-bar.cc b/lily/span-bar.cc
index d116caf288581316b54ec319badc9c0e04980873..4393de2def4b7392a23383329a6505d1062d4733 100644 (file)
--- a/lily/span-bar.cc
+++ b/lily/span-bar.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 #include "dimension-cache.hh"
 #include "span-bar.hh"
@@ -54,31 +54,6 @@ Span_bar::do_post_processing ()
   Interval i(get_spanned_interval ());
 
   translate_axis (i.center (), Y_AXIS);
-
-  /*
-    {[ stacking shift
-    ugh
-  */
-  SCM me = get_elt_property ("glyph");
-  if (gh_string_p (me) && ly_scm2string (me) == "bracket")
-    {
-      SCM e = get_elt_property ("other");
-      if (e != SCM_UNDEFINED)
-       {
-         assert (SMOB_IS_TYPE_B (Score_element, e));
-         Score_element* se = SMOB_TO_TYPE (Score_element, e);
-         SCM her = se->get_elt_property ("glyph");
-#if 0
-         // urg x-extent broken?
-         if (gh_string_p (her) && ly_scm2string (her) == "brace")
-           se->translate_axis (-extent (X_AXIS).length (), X_AXIS);
-#else
-         if (gh_string_p (her) && ly_scm2string (her) == "brace"
-             && !to_boolean (get_elt_property ("transparent")))
-           se->translate_axis (-paper_l ()->get_var ("interline"), X_AXIS);
-#endif 
-       }
-    }
 }
 
 void