X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fdispatcher.cc;h=0d899f94ba7ea27cfcc0b610ee4bd14d0eecb52f;hb=468619111ee6009098c318243e53d98cb884ef2c;hp=c2e777a131de776b42eda946f84d4ac7018da217;hpb=af60e9b57f205a3c2e044ac8db351b42ef3e26ad;p=lilypond.git

diff --git a/lily/dispatcher.cc b/lily/dispatcher.cc
index c2e777a131..0d899f94ba 100644
--- a/lily/dispatcher.cc
+++ b/lily/dispatcher.cc
@@ -181,9 +181,9 @@ Dispatcher::is_listened_class (SCM cl)
 
 static SCM
 accumulate_types (void * /* closure */,
-		  SCM key,
-		  SCM val,
-		  SCM result)
+                  SCM key,
+                  SCM val,
+                  SCM result)
 {
   if (scm_is_pair (val))
     return scm_cons (key, result);
@@ -259,7 +259,7 @@ Dispatcher::remove_listener (Listener l, SCM ev_class)
   scm_hashq_set_x (listeners_, ev_class, list);
 
   if (first)
-    warning ("Attempting to remove nonexisting listener.");
+    warning (_ ("Attempting to remove nonexisting listener."));
   else if (!scm_is_pair (list))
     {
       /* Unregister with all dispatchers. */
@@ -281,7 +281,7 @@ Dispatcher::register_as_listener (Dispatcher *disp)
   // Don't register twice to the same dispatcher.
   if (scm_assq (disp->self_scm (), dispatchers_) != SCM_BOOL_F)
     {
-      warning ("Already listening to dispatcher, ignoring request");
+      warning (_ ("Already listening to dispatcher, ignoring request"));
       return;
     }