make sure removed-selected-project works

lincpa · Sep 10, 2012 · f2fcc7b · f2fcc7b
1 parent 2a09746
commit f2fcc7b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/clooj/project.clj b/src/clooj/project.clj
@@ -189,6 +189,7 @@
         (JOptionPane/showMessageDialog nil "Unable to move project.")))))
 
 (defn remove-selected-project [app]
-  (apply swap! project-set disj (get-selected-projects app))
+  (apply swap! project-set disj (map #(.getAbsolutePath %)
+                                     (get-selected-projects app)))
   (update-project-tree (app :docs-tree)))