fix argument list parsing in define-command
fix argument list parsing in define-command

 * find &key on args directly, instead of calling
   alexandria:parse-ordinary-lambda-list. The arg list is decidedly
   not an ordinary-lambda-list and all we want from parsing it is to
   see if &key is on the list.

slyrus/mcclim,slyrus/mcclim