Efraim Flashner writes:
> * gnu/packages/wget.scm (wgetpaste): New variable.
> ---
> gnu/packages/wget.scm | 34 ++
> 1 file changed, 34 insertions(+)
>
> diff --git a/gnu/packages/wget.scm b/gnu/packages/wget.scm
> index 80da332..72aab86 100644
> --- a/gnu/packages/wget.scm
> +++ b/gnu/packages/wget.scm
> @@ -1,6 +1,7 @@
> ;;; GNU Guix --- Functional package management for GNU
> ;;; Copyright © 2012 Nikita Karetnikov
> ;;; Copyright © 2014, 2015 Ludovic Courtès
> +;;; Copyright © 2016 Efraim Flashner
> ;;;
> ;;; This file is part of GNU Guix.
> ;;;
> @@ -60,3 +61,36 @@ HTTPS and FTP protocols. It can resume interrupted
> downloads, use file name
> wild cards, supports proxies and cookies, and it can convert absolute links
> in downloaded documents to relative links.")
> (license gpl3+))) ; some files are under GPLv2+
> +
> +(define-public wgetpaste
> + (package
> +(name "wgetpaste")
> +(version "2.28")
> +(source
> + (origin
> +(method url-fetch)
> +(uri (string-append "http://wgetpaste.zlin.dk/wgetpaste-";
> +version ".tar.bz2"))
> +(sha256
> + (base32
> + "1hh9svyypqcvdg5mjxyyfzpdzhylhf7s7xq5dzglnm4injx3i3ak"
> +(build-system gnu-build-system)
> +(arguments
> + '(#: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"))
> +(zsh (string-append out "/share/zsh/site-functions")))
> + (install-file "wgetpaste" bin)
> + (install-file "_wgetpaste" zsh)
> + #:tests? #f)) ; no test target
> +(home-page "http://wgetpaste.zlin.dk/";)
> +(synopsis "Script that automates pasting to a number of pastebin
> services")
> +(description
> + "@code{wgetpaste} is an extremely simple command-line interface to
> various
> +online pastebin services.")
> +(license public-domain)))
> --
> 2.10.2
>
>
>
Thanks!
Applied and tested, works for me.