         javac-errs (javac-errors result-txt)
         outdated-jars (map #(.getName %)
                            (old-jars (File. micromanager "Install_AllPlatforms") 24))
-        installer-ok (exe-on-server? bits today-token)
-        missing-adapters (missing-device-adapters bits)
-        missing-pages (missing-device-pages bits)]
+        installer-ok (exe-on-server? bits today-token)]
     (when-not (and (empty? vs-error-text) (empty? outdated-dlls) false
                    (empty? javac-errs) (empty? outdated-jars)
                    installer-ok)

  (let [index-txt (slurp "http://valelab.ucsf.edu/~MM/MMwiki/index.php/Device%20Support")]
    (map second (re-seq #"a href=\"/~MM/MMwiki/index.php/(.*?)\"" index-txt))))

(defn missing-device-pages [bits]
  (let [dll-names (get-dll-names bits)
        device-page-names (device-pages)]
    (sort (clojure.set/difference (set dll-names) (set device-page-names)))))


        (report-segment "Outdated device adapter DLLs" outdated-dlls)
        (report-segment "Errors reported by java compiler" javac-errs)
        (report-segment "Outdated jar files" outdated-jars)
        (report-segment "Uncompiled device adapters" (missing-device-adapters bits))
        "\n\nIs installer download available on website?\n"
        (if installer-ok
          "Yes"
          "No. (build missing)\n")
        (when (= 32 bits)
          (report-segment "Missing device pages" (missing-device-pages)))
      ))))

(defn make-full-report [mode send?]
