diff options
Diffstat (limited to 'users/grfn/web/orgExportHTML.nix')
-rw-r--r-- | users/grfn/web/orgExportHTML.nix | 67 |
1 files changed, 0 insertions, 67 deletions
diff --git a/users/grfn/web/orgExportHTML.nix b/users/grfn/web/orgExportHTML.nix deleted file mode 100644 index aac4e32e7ac5..000000000000 --- a/users/grfn/web/orgExportHTML.nix +++ /dev/null @@ -1,67 +0,0 @@ -{ pkgs, depot, ... }: - -with pkgs; -with lib; - -let - - emacs = pkgs.emacs28; - -in - -opts: - -let - src = if isAttrs opts then opts.src else opts; - headline = if isAttrs opts then opts.headline else null; - - bn = builtins.baseNameOf src; - filename = elemAt (splitString "." bn) 0; - - outName = - if isNull headline - then - let - bn = builtins.baseNameOf src; - filename = elemAt (splitString "." bn) 0; - in - if depot.nix.utils.isDirectory src - then filename - else filename + ".html" - else "${filename}-${replaceStrings [" "] ["-"] filename}.html"; - - escapeDoubleQuotes = replaceStrings [ "\"" ] [ "\\\"" ]; - - navToHeadline = optionalString (! isNull headline) '' - (search-forward "${escapeDoubleQuotes headline}") - (org-narrow-to-subtree) - ''; - -in - -runCommand outName { inherit src; } '' - buildFile() { - cp "$1" file.org - ${emacs}/bin/emacs --batch \ - --load ${./config.el} \ - --visit file.org \ - --eval "(progn - ${escapeDoubleQuotes navToHeadline} - (org-html-export-to-html))" \ - --kill - rm file.org - substitute file.html "$2" \ - --replace '<title>‎</title>' "" - rm file.html - } - - if [ -d $src ]; then - for file in $src/*; do - result=''${file/$src/$out} - mkdir -p $(dirname $result) - buildFile $file ''${result/.org/.html} - done - else - buildFile $src $out - fi -'' |