Preventing accidental closure.

2014-12-14 21:15:38 -08:00
parent 18bfc55f04
commit 453ab61848
1 changed files with 5 additions and 1 deletions
--- a/desktop/src-common/advent/screens/safe.clj
+++ b/desktop/src-common/advent/screens/safe.clj
@@ -98,7 +98,11 @@
                                         (close entities))
                                     :else
                                     new-state)))
-                         (close entities)))))
+                         (if (or (< x start-x)
+                                 (> x (+ start-x 200))
+                                 (< y start-y)
+                                 (> y (+ start-y 75)))
+                           (close entities))))))

  :on-resize (fn [screen entities]
               (size! screen 320 240)))