                                 (format "Query Result of Saved Search: %s"
                                         (enutil-aget 'name search-attr))
                                 note-attrs
-                                `(enh-command-get-note-attrs-from-query
-                                  ,(enutil-aget 'query search-attr)))
+                                `(lambda () (enh-command-get-note-attrs-from-query
+                                             ,(enutil-aget 'query search-attr))))
       t))))
 
 

    (setq enh-browsing-page-widget-root nil))
  (when (and (null enh-browsing-page-data)
             enh-browsing-page-data-refresh-closure)
    (let (note-attrs
          (attrs-func (car enh-browsing-page-data-refresh-closure))
          (attrs-args (cdr enh-browsing-page-data-refresh-closure)))
      (setq note-attrs (apply attrs-func attrs-args))
      (setq enh-browsing-page-data note-attrs)))
  (let ((note-attrs enh-browsing-page-data)
        (note-list nil))
    (mapc

        (enh-browsing-create-page 'note-list
                                  (format "Query Result of: %s" query)
                                  note-attrs
                                  `(lambda () (enh-command-get-note-attrs-from-query ,query)))
        t)))))


