gnu: clusterssh: Update to 4.13.2.

* gnu/packages/admin.scm (clusterssh): Update to 4.13.2.
[build-system]: Switch to perl-build-system.
[arguments]: Remove 'set-load-paths' phase.
[inputs]: Remove perl.
[native-inputs]: Add perl-cpan-changes, perl-file-slurp, perl-file-which,
perl-module-build, perl-readonly, perl-test-differences,
perl-test-distmanifest, perl-test-perltidy, perl-test-pod,
perl-test-pod-coverage, perl-test-trap and perltidy.
[propagated-inputs]: Add perl-exception-class, perl-try-tiny and
perl-x11-protocol-other.
This commit is contained in:
Kei Kebreau 2018-06-15 22:02:32 -04:00
parent 469e82715e
commit c5829179ca
No known key found for this signature in database
GPG Key ID: E6A5EE3C19467A0D
1 changed files with 25 additions and 30 deletions

View File

@ -823,41 +823,36 @@ by bandwidth they use.")
(define-public clusterssh (define-public clusterssh
(package (package
(name "clusterssh") (name "clusterssh")
(version "3.28") (version "4.13.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://sourceforge/clusterssh/" (uri (string-append "mirror://sourceforge/clusterssh/"
"1.%20ClusterSSH%20Series%203/" version "2.%20ClusterSSH%20Series%204/"
"/clusterssh-" version ".tar.gz")) "App-ClusterSSH-v" version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"1bwggpvaj2al5blg1ynapviv2kpydffpzq2zkhi81najnvzc1rr7")))) "0rmk2p3f2wz1h092anidjclh212rv3gxyk0c641qk3frlrjnw6mp"))))
(build-system gnu-build-system) (build-system perl-build-system)
(inputs `(("perl" ,perl))) (native-inputs
(propagated-inputs `(("xterm" ,xterm) `(("perl-cpan-changes" ,perl-cpan-changes)
("perl-file-slurp" ,perl-file-slurp)
("perl-file-which" ,perl-file-which)
("perl-module-build" ,perl-module-build)
("perl-readonly" ,perl-readonly)
("perl-test-differences" ,perl-test-differences)
("perl-test-distmanifest" ,perl-test-distmanifest)
("perl-test-perltidy" ,perl-test-perltidy)
("perl-test-pod" ,perl-test-pod)
("perl-test-pod-coverage" ,perl-test-pod-coverage)
("perl-test-trap" ,perl-test-trap)
("perltidy" ,perltidy)))
(propagated-inputs
`(("xterm" ,xterm)
("perl-exception-class" ,perl-exception-class)
("perl-tk" ,perl-tk) ("perl-tk" ,perl-tk)
("perl-x11-protocol" ,perl-x11-protocol))) ("perl-try-tiny" ,perl-try-tiny)
(arguments ("perl-x11-protocol" ,perl-x11-protocol)
`(#:phases ("perl-x11-protocol-other" ,perl-x11-protocol-other)))
(modify-phases %standard-phases
(add-after 'install 'set-load-paths
(lambda* (#:key inputs outputs #:allow-other-keys)
;; Put the perl-tk and perl-x11-protocol modules in the perl inc
;; path for PROG
(let* ((out (assoc-ref outputs "out"))
(prog (string-append out "/bin/cssh"))
(perl-ver ,(package-version perl))
(x11-inc (string-append
(assoc-ref inputs "perl-x11-protocol")
"/lib/perl5/site_perl/" perl-ver))
(tk-inc (string-append
(assoc-ref inputs "perl-tk")
"/lib/perl5/site_perl/" perl-ver
"/x86_64-linux")))
(wrap-program
prog
`("PERL5LIB" ":" prefix (,x11-inc ,tk-inc))))
#t)))))
;; The clusterssh.sourceforge.net address requires login to view ;; The clusterssh.sourceforge.net address requires login to view
(home-page "https://sourceforge.net/projects/clusterssh/") (home-page "https://sourceforge.net/projects/clusterssh/")
(synopsis "Secure concurrent multi-server terminal control") (synopsis "Secure concurrent multi-server terminal control")