Yu-Gi-Oh! Deck Building and Card Inventory Management web interface written in Common Lisp, utilizing HTMX.
Você não pode selecionar mais de 25 tópicos Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.

45 linhas
1.3KB

  1. {% extends "layouts/default.html" %}
  2. {% block title %}Package Documentation{% endblock %}
  3. {% block content %}
  4. <div class="content">
  5. <div class="table-container">
  6. <table class="table is-bordered is-fullwidth">
  7. <tr>
  8. <th>Endpoint/URL (method)</th>
  9. <th>Parameters</th>
  10. <th>Documentation</th>
  11. </tr>
  12. {% for doc in docs %}
  13. <tr {% if not doc.1 %}class="has-background-danger"{% endif %}>
  14. <td><a href="{{ doc.0 }}">{{ doc.0 }}</a> {{ doc.2 }}</td>
  15. <td>
  16. {% if doc.3 %}
  17. <div class="highlight">
  18. <pre style="white-space: pre-wrap; overflow-wrap: break-word;">{{ doc.3 }}</pre>
  19. </div>
  20. {% endif %}
  21. </td>
  22. <td>
  23. {% if doc.1 %}
  24. <div class="highlight">
  25. <pre style="white-space: pre-wrap; overflow-wrap: break-word;">{{ doc.1 }}</pre>
  26. </div>
  27. {% endif %}
  28. </td>
  29. </tr>
  30. {% endfor %}
  31. </table>
  32. </div>
  33. </div>
  34. {% endblock %}
  35. {# comment #}
  36. (cl-who:with-html-output-to-string (s nil :prologue t)
  37. (:html
  38. (:head)
  39. (:body
  40. (loop for (url docstring methods params) in docs
  41. do (cl-who:htm (:h3 (cl-who:str url) " " (cl-who:fmt "~a" methods))
  42. (if params (cl-who:htm (:h4 (cl-who:fmt " Params: ~a" params))))
  43. (:div (cl-who:str docstring)))))))
  44. {# endcomment #}