diff options
Diffstat (limited to 'gn/packages/shell.scm')
| -rw-r--r-- | gn/packages/shell.scm | 47 |
1 files changed, 47 insertions, 0 deletions
diff --git a/gn/packages/shell.scm b/gn/packages/shell.scm new file mode 100644 index 0000000..185ac17 --- /dev/null +++ b/gn/packages/shell.scm @@ -0,0 +1,47 @@ +(define-module (gn packages shell) + #:use-module (guix packages) + #:use-module (guix download) + #:use-module (guix build-system gnu) + #:use-module (gnu packages) + #:use-module (guix git-download) + #:use-module ((guix licenses) #:prefix license:) + ) + +(define-public shunit2 + (let ((commit "60dd60bcd1573befe38465010263ab242e55811d")) + (package + (name "shunit2") + (version (string-append "2.1.7-" (string-take commit 7))) + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/kward/shunit2.git") + (commit commit))) + (file-name (string-append name "-" version "-checkout")) + (sha256 + (base32 "11savxc6qliqv25kv59qak6j7syjv95hbpmq1szn1mzn32g2gc25")))) + (build-system gnu-build-system) + (arguments + `( + #:tests? #f ;; no tests-suite + #:phases + (modify-phases %standard-phases + (delete 'configure) + (delete 'build) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (bin (string-append out "/bin"))) + (write (string-append "****************" bin)) + (copy-file "2.1/src/shunit2" (string-append bin "/shunit2")) + #t + )))) + )) + (home-page "https://code.google.com/archive/p/shunit2/") + (synopsis "xUnit based unit testing for Unix shell scripts") + (description + "shUnit2 is a xUnit unit test framework for Bourne based shell +scripts, and it is designed to work in a similar manner to JUnit, +PyUnit, etc. If you have ever had the desire to write a unit test for +a shell script, shUnit2 can do the job.") + (license license:lgpl2.0)))) |