* lily/midi-item.cc (name): new method.

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

diff --git a/lily/object-key-dumper-scheme.cc b/lily/object-key-dumper-scheme.cc
index 3a3d77575c04a1e3b0e2c24875da6d788f8e7e03..972b63175b03c1052477a71f6e757cf70b6c86dd 100644 (file)
--- a/lily/object-key-dumper-scheme.cc
+++ b/lily/object-key-dumper-scheme.cc
@@ -16,9 +16,7 @@ LY_DEFINE (ly_make_dumper, "ly:make-dumper",
           "Create a key dumper. ")
 {
   Object_key_dumper *u = new Object_key_dumper ();
-  SCM x = u->self_scm ();
-  scm_gc_unprotect_object (x);
-  return x;
+  return u->unprotect ();
 }
 
 LY_DEFINE (ly_dumper_definitions, "ly:dumper-definitions",