From bec23ccabc6f703012d51e91f10d67820938f78e Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Wed, 27 Mar 2002 02:03:09 +0000
Subject: [PATCH] lilypond-1.5.14

---
 lily/grob.cc        | 8 +++++---
 ly/property-init.ly | 2 +-
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/lily/grob.cc b/lily/grob.cc
index f1f80e720a..82b1771516 100644
--- a/lily/grob.cc
+++ b/lily/grob.cc
@@ -92,12 +92,14 @@ Grob::Grob (SCM basicprops)
     }
 
   SCM meta = get_grob_property ("meta");
-  SCM ifs = scm_assoc (ly_symbol2scm ("interfaces"), meta);
+  if (gh_pair_p (meta))
+    {
+      SCM ifs = scm_assoc (ly_symbol2scm ("interfaces"), meta);
   
-  set_grob_property ("interfaces",ly_cdr (ifs));
+      set_grob_property ("interfaces",ly_cdr (ifs));
+    }
 }
 
-
 Grob::Grob (Grob const&s)
    : dim_cache_ (s.dim_cache_)
 {
diff --git a/ly/property-init.ly b/ly/property-init.ly
index 83ea32eb9a..1d26dc2a03 100644
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -164,4 +164,4 @@ hideStaffSwitch = \property PianoStaff.followVoice = ##f
 % To remove a Volta bracet or some other graphical object,
 % set it to turnOff. Example: \property Staff.VoltaBracket = \turnOff
 
-turnOff = #'((meta .  ((interfaces . ()))))
+turnOff = #'()
-- 
2.39.5