 (defvar enh-browsing-page-data nil)
 (make-variable-buffer-local 'enh-browsing-page-data)
 
+(defvar enh-browsing-page-data-refresh-closure nil)
+(make-variable-buffer-local 'enh-browsing-page-data-refresh-closure)
+
 (defvar enh-browsing-page-widget-title nil)
 (make-variable-buffer-local 'enh-browsing-page-widget-title)
 

    (enh-browsing-push-page
     (enh-browsing-create-page 'note-list
                               (format "Query Result of: %s" query)
                               note-attrs))))


(defun evernote-browsing-prev-page ()

  (when enh-browsing-page-widget-root
    (widget-delete enh-browsing-page-widget-root)
    (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
