# nvim-lua-builder.scm -rw-r--r-- 527 bytes View raw
                                                                                
1
2
(call-with-output-file ((@ (guile) getenv) "out") (lambda (port) (set-port-encoding! port "UTF-8") (display (string-append (begin (use-modules (ice-9 popen) (ice-9 textual-ports)) (let* ((pipe (open-input-pipe (string-append "/gnu/store/r9fzzi2hi1imlhq8i7rwjnyk283d0j8h-fennel-1.0.0-0.03c1c95/bin/fennel" " --compile " "/gnu/store/gn3491b6fip5rfl59nn3crra6p1qa0l0-nvim.fnl"))) (output (get-string-all pipe))) (close-pipe pipe) (call-with-output-file ((@ (guile) getenv) "out") (lambda (file) (display output file)))))) port)))