ryuslash/edocs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Remove some superfluous <p> tags

Browse source
This commit is contained in:
Tom Willemse 2014-01-19 23:45:02 +01:00
parent ed6341fff0
commit 97d248c101
1 changed files with 3 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
edocs.el
View file

@ -251,9 +251,8 @@ parts of the module."
(insert name))) (insert name)))
(insert " " (if (consp doc) (car doc) "")) (insert " " (if (consp doc) (car doc) ""))
(edocs--with-tag "div" '(("class" . "docstring")) (edocs--with-tag "div" '(("class" . "docstring"))
(edocs--with-tag "p" nil (insert (or (edocs--format-doc doc known-symbols)
(insert (or (edocs--format-doc doc known-symbols) "Not documented.")))))
"Not documented."))))))
(edocs--normalize docs)))) (edocs--normalize docs))))
(defun edocs-generate () (defun edocs-generate ()
@ -275,8 +274,7 @@ into a buffer called `*edocs*' and switches to that buffer."
(edocs--with-tag "div" '(("class" . "container")) (edocs--with-tag "div" '(("class" . "container"))
(edocs--insert-title (edocs--module-name binfo) (edocs--insert-title (edocs--module-name binfo)
(edocs--module-summary binfo)) (edocs--module-summary binfo))
(edocs--with-tag "p" nil (insert (edocs--format-commentary commentary symbols))
(insert (edocs--format-commentary commentary symbols)))
(insert "<h2>API</h2>") (insert "<h2>API</h2>")
(mapc (lambda (spec) (edocs--format-symbol spec symbols)) (mapc (lambda (spec) (edocs--format-symbol spec symbols))
symbol-specs)) symbol-specs))