             (clojure.set/union (set non-windows-device-adapters)
                                (missing-vcproj)
                                (set dll-names))
-            (set device-page-names)))))
+            (set device-page-names)
+            (do-not-build)))))
 
 (defn str-lines [sequence]
   (apply str (interpose "\n" sequence)))

                                          (device-vcproj-files)))]
    (sort (clojure.set/difference (set project-names)
                                  (set dll-names)
                                  helper-vcprojs))))
     
(defn device-pages []

        (sort
          (clojure.set/difference
            (set (map #(.getName %) directories-without-vcproj))
            (do-not-build)
            non-windows-device-adapters))))

(defn device-vcproj-files []
    (filter #(.. % getName (endsWith ".vcproj"))
            (mapcat file-seq device-adapter-parent-dirs)))

(defn dll-name [file]
  (second (re-find #"mmgr_dal_(.*?).dll" (.getName file))))
