feat: markdown underline command

src/main/frontend/commands.cljs

@@ -147,6 +147,11 @@
      ["Embed Vimeo Video" [[:editor/input "{{vimeo }}" {:last-pattern slash
                                                         :backward-pos 2}]]]
 
+     (when (state/markdown?)
+       ["Underline" [[:editor/input "<ins></ins>"
+                      {:last-pattern slash
+                       :backward-pos 6}]]])
+
      ["Html Inline " (->inline "html")]
 
      ;; TODO:

src/main/frontend/state.cljs

@@ -250,6 +250,11 @@
 
      (get-in @state [:me :preferred_format] "markdown")))))
 
+(defn markdown?
+  []
+  (= (keyword (get-preferred-format))
+     :markdown))
+
 (defn get-pages-directory
   []
   (or