define-presentation-type and :inherit-from

[Stas Boukarev]

From http://bauhh.dyndns.org:8000/clim-spec/23-3.html#_4663
"If inherit-from is unsupplied, it defaults as follows: If name is or names a CLOS class, then the type inherits from the presentation type corresponding to the direct superclasses of that CLOS class (using and to specify multiple inheritance). Otherwise, the type named by name inherits from standard-object."
McClim has troubles with that, attached test files shows an error on the command "Test".
"Presentation type specifier NIL does not match the name CLIM-USER::FOO"