From c1346ae9abc2e5166d699c6b6aca793e717eec37 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Sun, 24 Nov 1996 11:59:28 +0000
Subject: [PATCH] lilypond-0.0.11

---
 hdr/paper.hh    | 1 +
 src/notehead.cc | 2 +-
 src/paper.cc    | 6 ++++++
 3 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/hdr/paper.hh b/hdr/paper.hh
index 84932a36ab..b2ba370b57 100644
--- a/hdr/paper.hh
+++ b/hdr/paper.hh
@@ -19,6 +19,7 @@ struct Paperdef {
     Paperdef();
     ~Paperdef();
     Real interline()const;
+    Real internote()const;
     Real rule_thickness()const;
     Real standard_height()const;
     Real note_width() const;
diff --git a/src/notehead.cc b/src/notehead.cc
index a103e69b3d..7abc0e6b8e 100644
--- a/src/notehead.cc
+++ b/src/notehead.cc
@@ -35,7 +35,7 @@ Notehead::brew_molecole()
 
     Paperdef *p = paper();
 
-    Real dy = p->interline()/2;
+    Real dy = p->internote();
     Symbol s = p->lookup_->ball(balltype);
     
     output = new Molecule(Atom(s));
diff --git a/src/paper.cc b/src/paper.cc
index 2b98eef988..5f31611f8e 100644
--- a/src/paper.cc
+++ b/src/paper.cc
@@ -59,6 +59,12 @@ Paperdef::interline() const
 {
     return lookup_->ball(4).dim.y.length();
 }
+
+Real
+Paperdef::internote() const
+{
+    return lookup_->internote();
+}
 Real
 Paperdef::note_width()const
 {
-- 
2.39.5