(defn toggle-class [id toggled-class]
	(let [el-classList (.-classList (.getElementById js/document id))]
		(if (.contains el-classList toggled-class)
			(.remove el-classList toggled-class)
			(.add el-classList toggled-class))))