diff --git a/hover-rs.scm b/hover-rs.scm deleted file mode 100644 index 9a3e810..0000000 --- a/hover-rs.scm +++ /dev/null @@ -1,74 +0,0 @@ -(define-module (hover-rs) - #:use-module (guix build-system cargo) - #:use-module (guix gexp) - #:use-module ((guix licenses) #:prefix license:) - #:use-module (guix packages) - #:use-module (guix git-download) - #:use-module (guix utils) - #:use-module (gnu packages crates-io)) - -(define location - (current-source-directory)) - -(define-public local-source - (local-file "." "source" - #:recursive? #t - #:select? (git-predicate location))) - -(define-public hover-rs - (package - (name "hover-rs") - (version "0.1.0") - (source local-source) - (build-system cargo-build-system) - (arguments - `(#:cargo-inputs - (("rust-nix" ,rust-nix-0.27) - ("rust-caps" ,rust-caps-0.5) - ("rust-clap" ,rust-clap-4) - ("rust-clap-complete" ,rust-clap-complete-4) - ("rust-color-eyre" ,rust-color-eyre-0.6) - ("rust-eyre" ,rust-eyre-0.6) - ("rust-libc" ,rust-libc-0.2) - ("rust-owo-colors" ,rust-owo-colors-3) - ("rust-rand" ,rust-rand-0.8) - ("rust-time" ,rust-time-0.3) - ("rust-tracing" ,rust-tracing-0.1) - ("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3)) - #:phases (modify-phases %standard-phases - (add-after 'install 'install-shell-completions - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (hover-bin (string-append out "/bin/hover"))) - (let* ((comp (string-append out "/share/bash-completion/completions"))) - (mkdir-p comp) - (let* ((outf (open-file (string-append comp "/hover.bash") "w")) - (pid (spawn - hover-bin - '("hover" "--completions" "bash") - #:output outf))) - (waitpid pid) - (close-port outf))) - (let* ((comp (string-append out "/share/zsh/site-functions"))) - (mkdir-p comp) - (let* ((outf (open-file (string-append comp "_zsh") "w")) - (pid (spawn - hover-bin - '("hover" "--completions" "zsh") - #:output outf))) - (waitpid pid) - (close-port outf))) - (let* ((comp (string-append out "/share/fish/vendor_completions.d"))) - (mkdir-p comp) - (let* ((outf (open-file (string-append comp "hover.fish") "w")) - (pid (spawn - hover-bin - '("hover" "--completions" "fish") - #:output outf))) - (waitpid pid) - (close-port outf))))))))) - (home-page "https://github.com/viperML/hover-rs") - (synopsis "Protective home overlay") - (description "hover-rs uses Linux's user namespaces to mount a volatile overlayfs over your $HOME. -Any write or delete operation is redirected to the upper layer, while your $HOME is left intact.") - (license license:eupl1.2)))