eql-specialized methods and before

[hall@research.att.com (Bob Hall)]

Is the following a bug, or am I doing something wrong?  It works okay
if I don't define the :BEFORE method.

Thanks,

-- Bob

Welcome to Macintosh Common Lisp Version 2.0.1!

(DEFMETHOD ZOG ((X (EQL :NORJ))) (print "Zognorj!"))
(DEFMETHOD ZOG ((X (EQL :BLID))) (PRINT "Zogblid!"))
(DEFMETHOD ZOG :BEFORE ((X T)) (PRINT "Before zog"))

(ZOG :NORJ)

> Error: No applicable primary methods for #<STANDARD-GENERIC-FUNCTION ZOG #x56BC8E>
>        Applicable methods: (#<STANDARD-METHOD ZOG :BEFORE (T)>)
> While executing: CCL::%METHOD-COMBINATION-ERROR
> Type Command-. to abort.
See the RestartsI menu item for further choices.
1 >