Fix off-by-one error in constrained-breaking.

[lilypond.git] / lily / object-key-undumper-scheme.cc

diff --git a/lily/object-key-undumper-scheme.cc b/lily/object-key-undumper-scheme.cc
index 713659eea449418fbe2194acbda5f8978c6ed546..6791a9cb5bf977049e9d2ba6f3a6a54f0310f3f8 100644 (file)
--- a/lily/object-key-undumper-scheme.cc
+++ b/lily/object-key-undumper-scheme.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "object-key-undumper.hh"
@@ -26,9 +26,7 @@ LY_DEFINE (ly_make_undumper, "ly:make-undumper",
           "Create a key undumper. ")
 {
   Object_key_undumper *u = new Object_key_undumper ();
-  SCM x = u->self_scm ();
-  scm_gc_unprotect_object (x);
-  return x;
+  return u->unprotect ();
 }
 
 LY_DEFINE (ly_undumper_lookup, "ly:undumper-lookup",