]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/clef-item.cc
release: 1.3.12
[lilypond.git] / lily / clef-item.cc
index c98c188f7cc4c09da9d5e33c34462832d8e1d861..644735e28822797a5cb91e2602bbbaf367a4770b 100644 (file)
@@ -22,12 +22,13 @@ Clef_item::do_pre_processing()
 {
   SCM style_sym =get_elt_property ("style");
   String style;
-  if (style_sym != SCM_UNDEFINED)
+  if (gh_string_p (style_sym))
     style = ly_scm2string (style_sym);
   
   if (break_status_dir() != RIGHT && style != "fullSizeChanges")
     symbol_ += "_change";
-  if (style == "transparent")
+  
+  if (style == "transparent")  // UGH. JUNKME
     {
       set_elt_property ("transparent", SCM_BOOL_T);
       set_empty (X_AXIS);
@@ -35,12 +36,10 @@ Clef_item::do_pre_processing()
 }
 
 /*
-  FIXME
+  JUNKME
 */
 Clef_item::Clef_item()
 {
-  set_elt_property ("breakable", SCM_BOOL_T);
-
   symbol_ = "treble";
 }