summaryrefslogtreecommitdiff
path: root/src/operationnull/utils.scm
blob: 39889ea5739ee5d8b030589c3fc60a5b46933778 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
;; SPDX-License-Identifier: CC-BY-SA-4.0
;; Copyright 2026 bdunahu <bdunahu@operationnull.com>
(define-module (operationnull utils)
  #:use-module (ice-9 ftw)
  #:use-module (ice-9 regex)
  #:use-module (srfi srfi-2)
  #:use-module (haunt site)
  #:export (post-uri
            get-art-metadata
            collect-arts-in))

(define (post-uri site post)
  (string-append "/posts/" (site-post-slug site post) ".html"))