From 6b83e40852e47305d71c32757ded774199bb9307 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Tue, 13 Mar 2018 04:10:32 -0400 Subject: Delete skribe-utils module. --- skribe-utils.scm | 40 ---------------------------------------- 1 file changed, 40 deletions(-) delete mode 100644 skribe-utils.scm diff --git a/skribe-utils.scm b/skribe-utils.scm deleted file mode 100644 index 8120853..0000000 --- a/skribe-utils.scm +++ /dev/null @@ -1,40 +0,0 @@ -(define-module (skribe-utils) - #:use-module (ice-9 match) - #:use-module (syntax-highlight) - #:use-module (syntax-highlight scheme) - #:use-module (syntax-highlight xml) - #:use-module (syntax-highlight c) - #:export (image/caption - scheme-source - xml-source - c-source)) - -(define (image/caption uri caption) - `((img (@ (class "centered rounded") - (src ,uri) - (alt ,caption))) - (div (@ (class "caption")) ,caption))) - -(define (scheme-source source) - (highlights->sxml - (highlight lex-scheme - (match source - ((source ...) - (string-concatenate source)) - (_ source))))) - -(define (xml-source source) - (highlights->sxml - (highlight lex-xml - (match source - ((source ...) - (string-concatenate source)) - (_ source))))) - -(define (c-source source) - (highlights->sxml - (highlight lex-c - (match source - ((source ...) - (string-concatenate source)) - (_ source))))) -- cgit v1.2.3