subroutinesearch_pageprivate
subroutine search_page(site, html)
Render the search results page.
Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
| site | type(site_t) | in | the site | |
| html | character(len=:) | out | allocatable | the HTML |
Calls
Source
Show the code
subroutine search_page(site, html)
type(site_t), intent(in) :: site !! the site
character(len=:), allocatable, intent(out) :: html !! the HTML
type(buffer_t) :: b
call page_head(site, 'Search', 0, '', .false., b)
call add(b, '<aside class="side">'//achar(10))
call site_side(site, 0, '', b)
call add(b, '</aside>'//achar(10)//'<main><div class="inner">'//achar(10)//'<h1>Search</h1>'//achar(10))
call add(b, '<p class="search-count"></p><div class="search-page"></div>'//achar(10))
call page_foot(site, b)
call take(b, html)
end subroutine search_page