Mercurial > hg > amuse
changeset 103:52433edc63e3
implementations/geerdes: fix geerdesl-pitched-event typo
darcs-hash:20070726093603-c0ce4-8113568d428af23d8df16ab242a8b92f285d7046.gz
| author | Marcus Pearce <m.pearce@gold.ac.uk> |
|---|---|
| date | Thu, 26 Jul 2007 10:36:03 +0100 |
| parents | 59e69a32b8d9 |
| children | 67f96832cfb0 |
| files | implementations/geerdes/methods.lisp |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/implementations/geerdes/methods.lisp Thu Jul 26 10:15:50 2007 +0100 +++ b/implementations/geerdes/methods.lisp Thu Jul 26 10:36:03 2007 +0100 @@ -142,5 +142,5 @@ (defgeneric lead-vocalp (event) (:method (e) (declare (ignore e)) nil)) -(defmethod lead-vocalp ((event geerdesl-pitched-event)) +(defmethod lead-vocalp ((event geerdes-pitched-event)) (= (midi-channel event) 4))