From: hanwen <hanwen>
Date: Tue, 27 Jul 2004 21:24:07 +0000 (+0000)
Subject: (print): return '() for height == 0.0 too.
X-Git-Tag: release/2.3.9~17
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=67f201862eddd2a454ced34c3ca0dcad2d68353d;p=lilypond.git

(print): return '() for height == 0.0 too.
---

diff --git a/lily/bar-line.cc b/lily/bar-line.cc
index f1de0e9f62..c3aa8fed59 100644
--- a/lily/bar-line.cc
+++ b/lily/bar-line.cc
@@ -35,7 +35,7 @@ Bar_line::print (SCM smob)
       String str  =ly_scm2string (s);
       SCM siz = scm_call_1 (barsiz_proc, me->self_scm ());
       Real sz = robust_scm2double (siz, 0);
-      if (sz < 0)
+      if (sz <= 0)
 	return SCM_EOL;
       
       return compound_barline (me, str, sz).smobbed_copy ();
@@ -59,7 +59,7 @@ Bar_line::compound_barline (Grob*me, String str, Real h)
   thinkern *= staffline;
   hair *= staffline;
   fatline *= staffline;
-  
+
   Stencil thin = simple_barline (me, hair, h);
   Stencil thick = simple_barline (me, fatline, h);
   Stencil dot = Font_interface::get_default_font (me)->find_by_name ("dots-dot");
@@ -142,9 +142,12 @@ Bar_line::compound_barline (Grob*me, String str, Real h)
 }
 
 Stencil
-Bar_line::simple_barline (Grob *me,Real w, Real h) 
+Bar_line::simple_barline (Grob *me,
+			  Real w,
+			  Real h) 
 {
   Real blot = me->get_paper ()->get_dimension (ly_symbol2scm ("blotdiameter"));
+  
   return Lookup::round_filled_box (Box (Interval (0,w), Interval (-h/2, h/2)), blot);
 }