Fixed possible errors

io.lisp

@@ -51,7 +51,7 @@
 ;;Currently, we'll be using regular eval, but it should be replaced once we have a defcommand macro.
 
 ;;Now we must create a defcommand macro (in order to simplify the task of limiting certain commands to certain groups of players, e.g. level 40 and above or only Occultists... It will also be used for the basic communication commands: say, tell. We'll need to implement channels with this as well.
-(defmacro defcommand (name (&rest args) player level class species gender gold  &body body)
+(defmacro defcommand (name (&rest args) player level c-class species gender gold  &body body)
   "Specialized DEFUN for commands to reduce code duplication"
   `(defun ,name (,args) 
      (if (or (> (player-gold player) ,gold) (null ,gold))
@@ -60,7 +60,7 @@
      (if (or (> (player-level player) ,level) (null ,level))
 	 ,@body
 	 (mulch-print "I do not know that command"))
-     (if (or (equalp (player-class player) ,class) (null ,class))
+     (if (or (equalp (player-class player) ,c-class) (null ,c-class))
 	 ,@body
 	 (mulch-print "I do not know that command"))
      (if (or (equalp (player-species player) ,species) (null ,species))