Revert "Add breaking changes"

This reverts commit f60d65e124.
This commit is contained in:
oakes
2014-09-17 14:06:17 -04:00
parent f60d65e124
commit 83b980b30d
2 changed files with 7 additions and 0 deletions

View File

@@ -563,3 +563,8 @@ of key-value pairs, which will be given to the function via its screen map.
screen-fn (-> screen-object :options (get fn-name))]
(apply execute-fn! screen-fn options)
nil))
(defn run!
"Deprecated. Please use `screen!` instead."
[& args]
(apply screen! args))

View File

@@ -101,6 +101,8 @@
:fps (graphics! :get-frames-per-second)
:fullscreen? (graphics! :is-fullscreen)
:touched? (input! :is-touched)
:x (input! :get-x) ; deprecated, use :point-x instead
:y (input! :get-y) ; deprecated, use :point-y instead (it is flipped)
:point-x (input! :get-x (or arg 0))
:point-y (- (graphics! :get-height) (input! :get-y (or arg 0)))
(u/throw-key-not-found k)))