(make-instance 'mewa::mewa-presentation-search
:search-presentation (make-presentation instance :type :search-model)
:list-presentation (make-presentation instance :type :listing
(make-instance 'mewa::mewa-presentation-search
:search-presentation (make-presentation instance :type :search-model)
:list-presentation (make-presentation instance :type :listing