Issue 5167/6: Changes: show \markup xxx = ... \etc assignments

[lilypond.git] / lily / smobs.cc

diff --git a/lily/smobs.cc b/lily/smobs.cc
index d36c9be7dc6f6ec560839c6c0b1c8c64c5941739..c700ea0d9b0f0a81d7e3f5d40774f5a85236b756 100644 (file)
--- a/lily/smobs.cc
+++ b/lily/smobs.cc
@@ -18,6 +18,13 @@
 */
 
 #include "smobs.hh"
+#include "listener.hh"
+
+Listener
+Smob_core::get_listener (SCM callback)
+{
+  return Listener (callback, self_scm ());
+}
 
 /*
   The CDR contains the actual protected list.