emacs keyboard macro for styling markdown html

md-result-styling.el

;; <!-- elem attr="val" -->
;; 
;; <elem>
;; => <elem attr="val">

;; <!-- section -->, <!-- /section -->
;; => <section>, </section>

;; <pre[ attr="val"]><code>, </code></pre>
;; => <pre[ attr="val"]>, </pre>

;; Original keys: C-x h <<replace-regexp>> <!-- SPC \ ( \ ([a-z]+ \ ).* \ ) SPC --> C-q LFD C-q LFD < \ 2> RET < \ 1> RET C-x h <<replace-regexp>> <!-- SPC \ (/?section \ ) SPC --> RET < \ 1> RET C-x h <<replace-regexp>> \ (<pre[^>]*> \ )<code> RET \ 1 RET C-x h <<replace-string>> < /code></pre> RET < /pre> RET

(fset 'md-result-styling
   [?\C-x ?h ?\M-x ?r ?e ?p ?l ?a ?c ?e ?- ?r ?e ?g ?e ?x ?p ?\C-m ?< ?! ?- ?- ?  ?\\ ?\( ?\\ ?\( ?\[ ?a ?- ?z ?\] ?+ ?\\ ?\) ?. ?* ?\\ ?\) ?  ?- ?- ?> ?\C-q ?\C-j ?\C-q ?\C-j ?< ?\\ ?2 ?> ?\C-m ?< ?\\ ?1 ?> ?\C-m ?\C-x ?h ?\M-x ?r ?e ?p ?l ?a ?c ?e ?- ?r ?e ?g ?e ?x ?p ?\C-m ?< ?! ?- ?- ?  ?\\ ?\( ?/ ?? ?s ?e ?c ?t ?i ?o ?n ?\\ ?\) ?  ?- ?- ?> ?\C-m ?< ?\\ ?1 ?> ?\C-m ?\C-x ?h ?\M-x ?r ?e ?p ?l ?a ?c ?e ?- ?r ?e ?g ?e ?x ?p ?\C-m ?\\ ?\( ?< ?p ?r ?e ?\[ ?^ ?> ?\] ?* ?> ?\\ ?\) ?< ?c ?o ?d ?e ?> ?\C-m ?\\ ?1 ?\C-m ?\C-x ?h ?\M-x ?r ?e ?p ?l ?a ?c ?e ?- ?s ?t ?r ?i ?n ?g ?\C-m ?< ?/ ?c ?o ?d ?e ?> ?< ?/ ?p ?r ?e ?> ?\C-m ?< ?/ ?p ?r ?e ?> ?\C-m])