   :name "set-state-state",
   :opts {:settings nil},
   :draw
-  "((q/fill 0) (q/text (q/state :text) 10 20) (q/text (str \"Full state: \" (q/state)) 10 40))",
+  "((q/background 255) (q/fill 0) (q/text (q/state :text) 10 20) (q/text (str \"Full state: \" (q/state)) 10 40))",
   :setup "(q/set-state! :text \"I'm state!\" :year (q/year))",
   :target :clj}
  {:fns ["clip" "no-clip"],

  :name "keyboard",
  :opts {:settings nil},
  :draw
  "((q/background 255) (q/fill 0) (doseq [[ind capt fn] [[0 \"key-as-keyword\" q/key-as-keyword] [1 \"key-code\" q/key-code] [2 \"key-coded?\" (fn* [] (q/key-coded? (q/raw-key)))] [3 \"key-pressed?\" q/key-pressed?] [4 \"raw-key\" q/raw-key]]] (q/text (str capt \" \" (fn)) 10 (+ (* 20 ind) 20))))",
  :setup "()",
  :target :cljs}
 {:fns ["sqrt"],

  :name "keyboard",
  :opts {:settings nil},
  :draw
  "((q/background 255) (q/fill 0) (comment \"iterate through all key-related functions\") (comment \"and print their values\") (doseq [[ind capt fn] [[0 \"key-as-keyword\" q/key-as-keyword] [1 \"key-code\" q/key-code] [2 \"key-coded?\" (fn* [] (q/key-coded? (q/raw-key)))] [3 \"key-pressed?\" q/key-pressed?] [4 \"raw-key\" q/raw-key] [5 \"key-modifiers\" q/key-modifiers]]] (q/text (str capt \" \" (fn)) 10 (+ (* 20 ind) 20))))",
  :setup "()",
  :target :clj}
 {:fns ["resize-sketch"],
