   ;; Window configuration may be restored intermittently.
   (setq lusty--initial-window-config (current-window-configuration)))
 
-(defun lusty-refresh-matches-buffer ()
+(defun lusty-refresh-matches-buffer (&optional use-previous-matches-p)
   "Refresh *Lusty-Matches*."
   (assert (minibufferp))
   (let* ((minibuffer-text (if lusty--wrapping-ido-p
                               ido-text
                             (minibuffer-contents-no-properties)))
          (matches
-          (ecase lusty--active-mode
-            (:file-explorer (lusty-file-explorer-matches minibuffer-text))
-            (:buffer-explorer (lusty-buffer-explorer-matches minibuffer-text))))
-         (truncated-matches (lusty-truncate-entries matches)))
+          (if use-previous-matches-p
+              lusty--previous-printed-matches
+            (lusty-truncate-matches
+             (ecase lusty--active-mode
+               (:file-explorer
+                (lusty-file-explorer-matches minibuffer-text))
+               (:buffer-explorer
+                (lusty-buffer-explorer-matches minibuffer-text)))))))
 
     ;; Update the matches window.
     (let ((lusty-buffer (get-buffer-create lusty-buffer-name)))

  (interactive)
  (when lusty--active-mode
    (incf lusty--highlighted-index)
    (lusty-refresh-matches-buffer)))

;;;###autoload
(defun lusty-highlight-previous ()

  (loop for item in lst
        maximizing (length item)))

;; For performance, trim the matches if we can prove we can't fit them all.
(defun lusty-truncate-matches (matches)
  (let* ((lusty-buffer (get-buffer-create lusty-buffer-name))
         (max-possibly-displayable-matches
          (with-current-buffer lusty-buffer
            (* (- (frame-height) 3)
               (/ (window-width)
                  (1+ (length lusty-column-separator))))))
         (cut-off-point (nthcdr max-possibly-displayable-matches matches))
         (truncate-p (consp cut-off-point)))

    (when truncate-p
      ;; Trim down the matches
      (setf (cdr cut-off-point) nil))

    matches))

(defun* lusty--display-entries (entries)

