diff options
| author | LuHui <luhux76@gmail.com> | 2022-10-24 13:13:58 +0800 |
|---|---|---|
| committer | Guix Patches Tester <> | 2022-10-25 21:08:47 +0100 |
| commit | 776814eee8fd2195945f71560e76f8cc03f27b34 (patch) | |
| tree | 735dc119dfe5e5c78c61e1242bd2f85156d1566c | |
| parent | d3e982dccbd8ec7e00a2ab3efa04bef8f1c16b9e (diff) | |
| download | guix-patches-776814eee8fd2195945f71560e76f8cc03f27b34.tar guix-patches-776814eee8fd2195945f71560e76f8cc03f27b34.tar.gz | |
gnu: Add new variable gkermitissue-58754
* gnu/packages/admin.scm (gkermit): Add new variable.
| -rw-r--r-- | gnu/packages/admin.scm | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index 4539e92a8c..f6aaf007f9 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -55,6 +55,7 @@ ;;; Copyright © 2022 Andreas Rammhold <andreas@rammhold.de> ;;; Copyright © 2022 ( <paren@disroot.org> ;;; Copyright © 2022 Matthew James Kraai <kraai@ftbfs.org> +;;; Copyright © 2022 LuHui <luhux76@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -5646,3 +5647,54 @@ file or files to several hosts.") (description "@code{doctl} provides a unified command line interface to the DigitalOcean API.") (license license:asl2.0))) + +(define-public gkermit + (package + (name "gkermit") + (version "2.01") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/KermitProject/gkermit") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0njxzwnvanrdnx6cs7y0136g2179wx8wbqk8iqxpb48dr2hg7zn1")))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f + #:make-flags (list (string-append "CC=" + ,(cc-for-target)) + (string-append "PREFIX=" + (assoc-ref %outputs "out"))) + #:phases (modify-phases %standard-phases + (delete 'configure) + (add-before 'build 'replace-hardcodepath + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (bin (string-append out "/bin")) + (doc (string-append out "/share/doc")) + (man1 (string-append out "/share/man/man1")) + (info (string-append out "/share/info"))) + (substitute* "makefile" + (("/usr/local/bin") + bin) + (("/usr/man/manl") + man1) ;may be a typo err? + (("/usr/local/doc") + doc) + (("/usr/local/info") + info) + (("CC=cc") + "CC ?= cc")) + (mkdir-p bin) + (mkdir-p doc) + (mkdir-p man1) + (mkdir-p info))))))) + + (home-page "https://github.com/KermitProject/gkermit") + (synopsis "Kermit for UNIX") + (description + "Use for uploading and downloading files with Kermit protocol") + (license license:gpl2))) |