tag attributes now quoted
This commit is contained in:
parent
60f9947916
commit
ea65c1ed2d
|
@ -13,7 +13,7 @@
|
||||||
(defun md4tj-begin-tag (tag &optional attrs)
|
(defun md4tj-begin-tag (tag &optional attrs)
|
||||||
"Return beginning html tag for TAG with optional ATTRS."
|
"Return beginning html tag for TAG with optional ATTRS."
|
||||||
(concat "<" tag
|
(concat "<" tag
|
||||||
(mapconcat 'identity (cl-map 'listp (lambda (l) (concat " " (nth 0 l) "=" (nth 1 l))) attrs) "")
|
(mapconcat 'identity (cl-map 'listp (lambda (l) (concat " " (nth 0 l) "=" "\"" (nth 1 l) "\"")) attrs) "")
|
||||||
">"))
|
">"))
|
||||||
|
|
||||||
(defun md4tj-end-tag (tag)
|
(defun md4tj-end-tag (tag)
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
<h3>Hello world!</h3>
|
<h3>Hello world!</h3>
|
||||||
<h4>Hello <strong><em>world</em></strong>!</h4>
|
<h4>Hello <strong><em>world</em></strong>!</h4>
|
||||||
<br/>
|
<br/>
|
||||||
<p><a href=https://example.com>Example website</a></p>
|
<p><a href="https://example.com">Example website</a></p>
|
||||||
<p><img src=usbs.png alt=Example image></p>
|
<p><img src="usbs.png" alt="Example image"></p>
|
||||||
<br/>
|
<br/>
|
||||||
<ul>
|
<ul>
|
||||||
<li><p>unordered item 1</p></li>
|
<li><p>unordered item 1</p></li>
|
||||||
|
|
Loading…
Reference in New Issue