;;; Harmonic Flow web site

(define-module (apps media templates screenshots-overview)
  #:use-module (apps base templates theme)
  #:use-module (apps base types)
  #:use-module (apps base utils)
  #:use-module (apps i18n)
  #:use-module (apps media templates components)
  #:export (screenshots-overview-t))


(define (screenshots-overview-t screenshots)
  "Return an SHTML page for all SCREENSHOTS."
  (theme
   #:title (C_ "webpage title" '("Overview of all available screenshots |"))
   #:description (G_ "Overview of all available screenshots.")
   #:keywords
   (string-split ;TRANSLATORS: |-separated list of webpage keywords
    (G_ "Harmonic Flow|HFGE|Screenshots|Overview") #\|)
   #:active-menu-item (C_ "website menu" "Screenshots")
   #:css (list (hfweb-url "static/base/css/index.css"))
   #:crumbs (list (crumb (C_ "website menu" "Screenshots") "./"))
   #:content
   `(main
     (section
      (@ (class "light-text centered-text noise-bg"))

      ,(screenshots-box screenshots (length screenshots) #:shadow #t)))))