Mercurial > hg > amuse

changeset 62:9cdd79c34442

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
trivial whitespace darcs-hash:20070628070420-df18d-d0ee07e3335a75f609fc5d0fb171e955100efb4a.gz
author csr21 <csr21@cantab.net>
date Thu, 28 Jun 2007 08:04:20 +0100
parents c911d65ae94d
children 32314fefc706
files implementations/gsharp/gsharp-import.lisp
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/implementations/gsharp/gsharp-import.lisp	Wed Jun 27 11:28:39 2007 +0100
+++ b/implementations/gsharp/gsharp-import.lisp	Thu Jun 28 08:04:20 2007 +0100
@@ -147,7 +147,7 @@
           (spellings note-sequence (cdr spellings)))
          ((null list))
       (let* ((event (caar list))
-             (note (amuse-gsharp:note event))
+              (note (amuse-gsharp:note event))
              (accidental (elt (second (car spellings)) 1))
              (converted (cdr (assoc accidental accidental-conversions :test #'string=))))
         (unless (eq (gsharp-buffer:accidentals note) converted)