- (command "look" cmatch-just-verb always 'look-room)
- (command "look" cmatch-direct-obj always 'look-member)
- (command "go" cmathc-just-verb always 'go-where)
- (command "go" cmatch-direct-obj always 'go-exit)))
+ (full-command "look" cmatch-just-verb always 'look-room)
+ (full-command "look" cmatch-direct-obj always 'look-member)
+ (full-command "go" cmathc-just-verb always 'go-where)
+ (full-command "go" cmatch-direct-obj always 'go-exit)))