# HG changeset patch
# User m.pearce <m.pearce@gold.ac.uk>
# Date 1181836962 -3600
# Node ID 085c1728480cf9358d2454157941d9aa10f18ddc
# Parent  2fd7ebed5b875b4bb3c8222ffd9a78964706843e
"Prefix initargs with colons."

darcs-hash:20070614160242-aa3d6-7f7722cbe2fec0425475a3f8ff3ce9eeb07bee54.gz

diff -r 2fd7ebed5b87 -r 085c1728480c base/classes.lisp
--- a/base/classes.lisp	Thu Jun 14 15:52:09 2007 +0100
+++ b/base/classes.lisp	Thu Jun 14 17:02:42 2007 +0100
@@ -73,13 +73,13 @@
   ;; Only has line-of-fifths distance from c, so custom signatures
   ;; won't work
   ((sharp-count :accessor %basic-key-signature-sharp-count
-		:initarg sharp-count)))
+		:initarg :sharp-count)))
 
 (defclass midi-key-signature (basic-key-signature)
   ;; Is mode ever used in real life? Is it ever accurately used in
   ;; real life?
   ((mode :accessor %midi-key-signature-mode
-	 :initarg mode)))
+	 :initarg :mode)))
 
 (defclass tempo (anchored-period)
   ;; accel and rit in symbolic encoding will need other structures, as