TCG functions
parent
2326330025
commit
0ae65fea85
@ -0,0 +1,7 @@
|
||||
(defun cardimgs (start end)
|
||||
"Insert HTML string for card images"
|
||||
(interactive "r")
|
||||
(setq original (buffer-substring (region-beginning) (region-end)))
|
||||
(delete-region start end)
|
||||
(setq imgs (replace-regexp-in-string ", " ".gif\"><img src=\"https://colors-tcg.eu/cards/" original))
|
||||
(insert (concat "<img src=\"https://colors-tcg.eu/cards/" imgs ".gif\">")))
|
Loading…
Reference in New Issue