   day
   "Get the current day of the month (1 through 31)."
   []
-  (PApplet/day))
+  #+clj (PApplet/day)
+  #+cljs (.day (current-applet)))
 
 (defn
   ^{:requires-bindings false

  []
  (.millis (current-applet)))

#+clj
(defn
  ^{:requires-bindings false
    :processing-name "minute()"

                    hint-type)]
    (.hint (current-graphics) (int hint-type))))

(defn
  ^{:requires-bindings false
    :processing-name "hour()"
