                                        (enutil-aget 'name
                                                     (enh-get-search-attr guid)))
                                note-attrs
-                               `(enh-command-get-note-attrs-from-query
-                                 ,(enutil-aget 'query
-                                               (enh-get-search-attr guid)))))))
+                               `(lambda () (enh-command-get-note-attrs-from-query
+                                            ,(enutil-aget 'query
+                                                          (enh-get-search-attr guid))))))))
 
 
 (defun enh-browsing-open-note (widget &rest ignored)

    (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))))))


(defun evernote-browsing-prev-page ()
