From mboxrd@z Thu Jan  1 00:00:00 1970
From: ng0 <ng0@libertad.pw>
Subject: Re: [PATCH 2/8] gnu: Add wgetpaste.
Date: Wed, 23 Nov 2016 11:48:12 +0000
Message-ID: <87lgwaquwz.fsf@we.make.ritual.n0.is>
References: <20161121210035.13726-1-efraim@flashner.co.il>
	<20161121210035.13726-3-efraim@flashner.co.il>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
Return-path: <guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:44246)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <ng0@we.make.ritual.n0.is>) id 1c9W2X-000241-LB
	for guix-devel@gnu.org; Wed, 23 Nov 2016 06:48:38 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <ng0@we.make.ritual.n0.is>) id 1c9W2U-0001YZ-Ip
	for guix-devel@gnu.org; Wed, 23 Nov 2016 06:48:37 -0500
Received: from aibo.runbox.com ([91.220.196.211]:34538)
	by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32)
	(Exim 4.71) (envelope-from <ng0@we.make.ritual.n0.is>)
	id 1c9W2U-0001Xw-8T
	for guix-devel@gnu.org; Wed, 23 Nov 2016 06:48:34 -0500
In-Reply-To: <20161121210035.13726-3-efraim@flashner.co.il>
List-Id: "Development of GNU Guix and the GNU System distribution."
	<guix-devel.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/guix-devel>,
	<mailto:guix-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/guix-devel/>
List-Post: <mailto:guix-devel@gnu.org>
List-Help: <mailto:guix-devel-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/guix-devel>,
	<mailto:guix-devel-request@gnu.org?subject=subscribe>
Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org
Sender: "Guix-devel" <guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org>
To: Efraim Flashner <efraim@flashner.co.il>
Cc: guix-devel@gnu.org

Efraim Flashner <efraim@flashner.co.il> 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 <nikita@karetnikov.org>
>  ;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org>
> +;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
>  ;;;
>  ;;; 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.