              (->> (.listFiles f)
                   (remove #(.isDirectory %))
                   (map #(.getName %))
-                  (filter #(.contains % "_MMImages"))
+                  (filter #(or (.contains % "_images")
+                               (.contains % "_MMImages")))
                   seq)))))
        
 (defn find-data-sets [root-dir]

           [java.io BufferedReader File FileReader PrintWriter]
           [java.util Comparator Vector]
           [java.util.prefs Preferences]
           [java.util.concurrent LinkedBlockingQueue]
           [java.awt Color Dimension Font Insets]
           [java.awt.event ItemEvent ItemListener KeyAdapter MouseAdapter
                           WindowAdapter WindowListener]

      (.addItemListener
        (proxy [ItemListener] []
          (itemStateChanged [_] (reset! value-atom (.isSelected cb))))))))

(defn update-no-faster-than [run-function interval]
  (let [now (System/currentTimeMillis)]
    (future
      (Thread/sleep interval)
      (when (> (- now @last-table-update) interval)
        (reset! last-table-update now)
        (run-function)))))

(defn create-browser []
  (let [frame (JFrame.)
