Merge branch 'master' of ssh+git://hanwen@git.sv.gnu.org/srv/git/lilypond

[lilypond.git] / lily / stem.cc

diff --git a/lily/stem.cc b/lily/stem.cc
index a882e73a1ffc1a8076c1c74596cfea57e41ac99c..e63b96019ae4adadf54fc6812d53be95c9a139ff 100644 (file)
--- a/lily/stem.cc
+++ b/lily/stem.cc
@@ -702,6 +702,9 @@ Stem::print (SCM smob)
   if (!lh && stemlet && !beam)
     return SCM_EOL;
 
+  if (lh && robust_scm2int (lh->get_property ("duration-log"), 0) < 1) 
+    return SCM_EOL;
+
   if (is_invisible (me))
     return SCM_EOL;