;; todo: module
(define (overall-wrapper content)
  `(html
    (link (@ (rel "stylesheet")
             (type "text/css")
             (href "style.css")))
    (head (title "Welcome to GuileDocs"))
    (body
     (div (@ (id "overall-wrapper"))
          (header (h3 "🚀GuileDocs")
                  (input (@ (type "text")
                            (placeholder "Search (ctrl-s)")))
                  (menu (li "Core Library")
                        (li "Quick Ref")))
          (nav (section (h4 "Navigation")
                        (menu (li "Top")
                              (li "Examples")
                              (li "See Also")))
               (section (h4 "Namespace")
                        (menu (li "guile")
                              (li "srfi"))))
          ,content
          (footer (p (i "powered by solarpunks.")))))))