config: Remove unneeded things.
* haunt/config.scm.in (%haunt-cwd, haunt-file-name, haunt-output-directory): Remove.
This commit is contained in:
parent
db0f607f28
commit
2e136d15a5
|
@ -23,20 +23,6 @@
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
(define-module (haunt config)
|
(define-module (haunt config)
|
||||||
#:export (%haunt-version
|
#:export (%haunt-version))
|
||||||
%haunt-cwd
|
|
||||||
haunt-file-name
|
|
||||||
haunt-output-directory))
|
|
||||||
|
|
||||||
(define %haunt-version "@PACKAGE_VERSION@")
|
(define %haunt-version "@PACKAGE_VERSION@")
|
||||||
|
|
||||||
(define %haunt-cwd (getcwd))
|
|
||||||
|
|
||||||
(define (haunt-file-name rel)
|
|
||||||
"Return an absolute file name to the file REL in the haunt current
|
|
||||||
working directory."
|
|
||||||
(string-append %haunt-cwd "/" rel))
|
|
||||||
|
|
||||||
(define (haunt-output-directory)
|
|
||||||
"Return the current haunt compiled page output directory."
|
|
||||||
(haunt-file-name "output"))
|
|
||||||
|
|
Loading…
Reference in New Issue