You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
63 lines
1.7 KiB
Racket
63 lines
1.7 KiB
Racket
#lang racket/base
|
|
(require racket/runtime-path)
|
|
|
|
(provide (prefix-out world: (all-defined-out)))
|
|
|
|
(define pollen-version "0.001")
|
|
|
|
(define preproc-source-ext 'pp)
|
|
(define markup-source-ext 'pm)
|
|
(define markdown-source-ext 'pmd)
|
|
(define null-source-ext 'p)
|
|
(define pagetree-source-ext 'ptree)
|
|
(define template-source-ext 'pt)
|
|
(define scribble-source-ext 'scrbl)
|
|
|
|
(define mode-auto 'auto)
|
|
(define mode-preproc 'pre)
|
|
(define mode-markup 'markup)
|
|
(define mode-markdown 'markdown)
|
|
(define mode-pagetree 'ptree)
|
|
(define mode-template 'template)
|
|
|
|
(define cache-filename "pollen.cache")
|
|
|
|
(define decodable-extensions (list markup-source-ext pagetree-source-ext))
|
|
|
|
(define default-pagetree "index.ptree")
|
|
(define pagetree-root-node 'pagetree-root)
|
|
|
|
(define command-marker #\◊)
|
|
(define template-command-marker #\∂)
|
|
|
|
(define default-template-prefix "template")
|
|
(define fallback-template-prefix "fallback")
|
|
(define template-meta-key "template")
|
|
|
|
(define main-pollen-export 'doc) ; don't forget to change fallback template too
|
|
(define meta-pollen-export 'metas)
|
|
|
|
(define directory-require "directory-require.rkt")
|
|
|
|
(define newline "\n")
|
|
(define linebreak-separator newline)
|
|
(define paragraph-separator "\n\n")
|
|
|
|
(define paths-excluded-from-dashboard
|
|
(map string->path (list "poldash.css" "compiled")))
|
|
|
|
|
|
(define current-project-root (make-parameter (current-directory)))
|
|
|
|
(define default-port 8080)
|
|
(define current-server-port (make-parameter default-port))
|
|
|
|
(define dashboard-css "poldash.css")
|
|
|
|
(define-runtime-path server-extras-dir "server-extras")
|
|
(define current-server-extras-path (make-parameter server-extras-dir))
|
|
|
|
(define check-directory-requires-in-render? (make-parameter #t))
|
|
|
|
(define clone-directory-name "clone")
|