diff --git a/src/play_clj/core.clj b/src/play_clj/core.clj
index 49f2a16..f28bf7a 100644
--- a/src/play_clj/core.clj
+++ b/src/play_clj/core.clj
@@ -101,7 +101,7 @@
 (defn set-screen!
   [^Game game & screens]
   (let [add-inputs! (fn []
-                      (input! :setInputProcessor (InputMultiplexer.))
+                      (input! :set-input-processor (InputMultiplexer.))
                       (doseq [screen screens]
                         (add-input! (:input-processor screen))
                         (add-input! (:gesture-detector screen))))