diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-27 20:43:35 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-27 20:43:35 +0200 |
commit | 90b7ef271e06dcca56745bf0bc9012eb24887bb1 (patch) | |
tree | 8f8ef3b6ea5c504c96717886d5d047e5a05d3b4a /module/calp/util.scm | |
parent | Bump version. (diff) | |
download | calp-90b7ef271e06dcca56745bf0bc9012eb24887bb1.tar.gz calp-90b7ef271e06dcca56745bf0bc9012eb24887bb1.tar.xz |
Add /search/text endpoint.
Diffstat (limited to '')
-rw-r--r-- | module/calp/util.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/calp/util.scm b/module/calp/util.scm index 25c753dc..7c176c50 100644 --- a/module/calp/util.scm +++ b/module/calp/util.scm @@ -533,6 +533,9 @@ (define-public ->string ->str) +(define-public (->quoted-string any) + (with-output-to-string (lambda () (write any)))) + (define-public (path-append . strings) (fold (lambda (s done) (string-append |