Fix for beaming in Kievan notation (issue 6305080)

[aleksandr . andreev]

Reviewers: ,

Message:
A first attempt at fixing issue 2492.

This fixes the note heads for beamed kievan notes, also getting rid of
the warning messages.

Description:
Fix for beaming in Kievan notation

Implementing correct beaming functionality in Kievan notation

Fix for Issue 2492

Please review this at http://codereview.appspot.com/6305080/

Affected files:
  M lily/note-head.cc
  M ly/engraver-init.ly


Index: lily/note-head.cc
diff --git a/lily/note-head.cc b/lily/note-head.cc
index  
fb93e40eeb82f02574c2fa670183d19054214fd6..287b10dc043a42ce8ebe613422a8c51fe916874b  
100644
--- a/lily/note-head.cc
+++ b/lily/note-head.cc
@@ -80,6 +80,15 @@ internal_print (Grob *me, string *font_char)
         }
     }

+  if (style == "kievan"
+      && 3 == robust_scm2int (me->get_property ("duration-log"), 2))
+    {
+      Grob *stem = unsmob_grob (me->get_object ("stem"));
+      Grob *beam = unsmob_grob (stem->get_object ("beam"));
+      if (beam)
+        out = fm->find_by_name (idx_either + "2kievan");
+    }
+
   idx_either += suffix;
   if (out.is_empty ())
     {
Index: ly/engraver-init.ly
diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
index  
9bb731883cba5d9754fdc7c2030508b49bde06f4..b4a7008b8d4c1f7338557f4f0b0448285bb0b417  
100644
--- a/ly/engraver-init.ly
+++ b/ly/engraver-init.ly
@@ -1146,8 +1146,6 @@ accommodated for typesetting a piece in Kievan style."

  %% There are beams in Kievan notation, but they are invoked manually
  autoBeaming = ##f
- \override Beam #'beam-thickness = #0.32
- \override Beam #'length-fraction = #0.62
 }

 \context {