add catmidi.py for debugging midi.

[lilypond.git] / scm / output-lib.scm

diff --git a/scm/output-lib.scm b/scm/output-lib.scm
index d8f52c588e9e497ce8161e6ccd77c6ee4aa88da3..3cfefc8f3e58f53aac4f323105d7f769fb32d3ef 100644 (file)
--- a/scm/output-lib.scm
+++ b/scm/output-lib.scm
@@ -30,14 +30,6 @@
                   (ly:grob-property grob 'text))
             ))
 
-(define-public (music-cause grob)
-  (let*
-      ((event (event-cause grob)))
-
-    (if (ly:stream-event? event)
-       (ly:event-property event 'music-cause)
-       #f)))
-
 (define-public (event-cause grob)
   (let*
       ((cause (ly:grob-property  grob 'cause)))