fix: cards ux and shortcuts

src/main/frontend/extensions/srs/handler.cljs

@@ -5,11 +5,14 @@
   [id]
   (let [nodes (sel [:#cards-modal (str "." id)])]
     (doseq [node nodes]
-      (.click node))))
+      (.focus node)
+      (.click node)
+      (js/setTimeout #(.blur node) 100))))
 
 (defn toggle-answers []
   (click "card-answers"))
 
+;; file-based
 (defn next-card []
   (click "card-next"))
 
@@ -21,3 +24,16 @@
 
 (defn recall []
   (click "card-recall"))
+
+;; db-based
+(defn card-again []
+  (click "card-again"))
+
+(defn card-hard []
+  (click "card-hard"))
+
+(defn card-good []
+  (click "card-good"))
+
+(defn card-easy []
+  (click "card-easy"))