Issue 4357/5: Remove Scheme listeners as they are just callbacks now.

[lilypond.git] / lily / include / dispatcher.hh

diff --git a/lily/include/dispatcher.hh b/lily/include/dispatcher.hh
index 5ce2081d97aeb2c1c9e84e898cf118463d227e5e..f7efad821467b6aaf51d9a0dfc89019a35db265f 100644 (file)
--- a/lily/include/dispatcher.hh
+++ b/lily/include/dispatcher.hh
@@ -42,13 +42,14 @@ private:
   /* priority counter. Listeners with low priority receive events
      first. */
   int priority_count_;
-  void internal_add_listener (Listener, SCM event_class, int priority);
+  void internal_add_listener (SCM callback, SCM event_class, int priority);
 public:
   Dispatcher ();
   void broadcast (Stream_event *ev);
   bool is_listened_class (SCM);
   SCM listened_types ();
   void add_listener (Listener, SCM event_class);
+  void add_listener (SCM callback, SCM event_class);
   void remove_listener (Listener, SCM event_class);
   void register_as_listener (Dispatcher *dist);
   void unregister_as_listener (Dispatcher *dist);