[Make accessor names more consistent
clinton@unknownlamer.org**20080501115904] {
hunk ./src/spells.lisp 9
-  ((domain :initarg :domain :accessor domain :index t))
+  ((domain :initarg :domain :accessor spell-domain :index t))
hunk ./src/spells.lisp 13
-  ((name :initarg :name :accessor domain-name :index t)
+  ((name :initarg :name :accessor spell-domain-name :index t)
hunk ./src/spells.lisp 22
-(defgeneric spell-subschool (spell-school))
+(defgeneric spell-subschool-name (spell-school))
hunk ./src/spells.lisp 24
-(defmethod spell-subschool ((s spell-school)) nil)
+(defmethod spell-subschool-name ((s spell-school)) nil)
hunk ./src/spells.lisp 52
-   (casting-time :initarg :casting-time :accessor casting-time)
+   (casting-time :initarg :casting-time :accessor spell-casting-time)
hunk ./src/spells.lisp 56
-   (saving-throw :initarg :saving-throw :accessor saving-throw)
+   (saving-throw :initarg :saving-throw :accessor spell-saving-throw)
}