Plaster

(DEFCLASS PANEL-SEARCH (CLOG-PANEL) ((SEARCH-BUTTON :READER SEARCH-BUTTON) (GREP-INPUT :READER GREP-INPUT) (DIR-INPUT :READER DIR-INPUT) (RESULT-BOX :READER RESULT-BOX) (RESULT-GRID :READER RESULT-GRID)))