bug#26667: fish-guix now with patch

[ng0 <ng0@pragmatique.xyz>]

[-- Attachment #1: Type: text/plain, Size: 51 bytes --]

I have forgotten to append the patch. Here it is.


[-- Attachment #2: 0001-gnu-Add-fish-guix.patch --]
[-- Type: text/plain, Size: 2248 bytes --]

From 583c6b16b08c93a991bfc0ece7002a147c9264db Mon Sep 17 00:00:00 2001
From: ng0 <ng0@no-reply.pragmatique.xyz>
Date: Wed, 26 Apr 2017 11:10:01 +0000
Subject: [PATCH] gnu: Add fish-guix.

* gnu/packages/shells.scm (fish-guix): New variable.
---
 gnu/packages/shells.scm | 33 ++++++++++++++++++++++++++++++++-
 1 file changed, 32 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/shells.scm b/gnu/packages/shells.scm
index 012f272ca..1f749f5ce 100644
--- a/gnu/packages/shells.scm
+++ b/gnu/packages/shells.scm
@@ -6,7 +6,7 @@
 ;;; Copyright © 2016 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2016 Stefan Reichör <stefan@xsteve.at>
 ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
-;;; Copyright © 2017 ng0 <contact.ng0@cryptolab.net>
+;;; Copyright © 2017 ng0 <ng0@no-reply.pragmatique.xyz>
 ;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -147,6 +147,37 @@ highlighting.")
     (home-page "https://fishshell.com/")
     (license gpl2)))
 
+(define-public fish-guix
+  (package
+    (name "fish-guix")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://dist.pragmatique.xyz/fish-guix/"
+                           name "-" version ".tar.xz"))
+       (sha256
+        (base32
+         "1nyylj8yq0c9wx4q7ak4ygygg5hsrqlgscbw9iip2mmyfiz0v8d7"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:tests? #f ; No checks.
+       #:phases
+       (modify-phases %standard-phases
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (func (string-append out "/share/fish/functions")))
+               (install-file "guix.fish" func))
+             #t))
+         (delete 'build)
+         (delete 'configure))))
+    (home-page "https://pragmatique.noblogs.org/software/fish-guix/downloads/")
+    (synopsis "Fish completions for Guix")
+    (description
+     "Fish-guix provides completions for Guix for users of the fish shell.")
+    (license public-domain)))
+
 (define-public rc
   (package
     (name "rc")
-- 
2.12.2