# HG changeset patch # User csr21 # Date 1183014260 -3600 # Node ID 9cdd79c34442daddc09545168c1e846211460512 # Parent c911d65ae94d8030b7068e4b7cfe34feb2231510 trivial whitespace darcs-hash:20070628070420-df18d-d0ee07e3335a75f609fc5d0fb171e955100efb4a.gz diff -r c911d65ae94d -r 9cdd79c34442 implementations/gsharp/gsharp-import.lisp --- 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)