Rename nonfree path to nongnu.

* nonfree/packages/linux.scm: Move to...
* nongnu/packages/linux.scm: ... here.
* nonfree/packages/gog.scm: Move to...
* nongnu/packages/gog.scm: ... here.

1 files changed, 0 insertions, 113 deletions

diff --git a/nonfree/packages/linux.scm b/nonfree/packages/linux.scm
deleted file mode 100644
index 4d74080..0000000
--- a/nonfree/packages/linux.scm
+++ /dev/null
@@ -1,113 +0,0 @@
-;;; Copyright © 2019 Alex Griffin <a@ajgrf.com>
-;;; Copyright © 2012, 2013, 2014, 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
-;;; Copyright © 2013, 2014 Andreas Enge <andreas@enge.fr>
-;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
-;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
-;;; Copyright © 2015 Federico Beffa <beffa@fbengineering.ch>
-;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
-;;; Copyright © 2015, 2017, 2018 Andy Wingo <wingo@igalia.com>
-;;;
-;;; This program is free software: you can redistribute it and/or modify
-;;; it under the terms of the GNU General Public License as published by
-;;; the Free Software Foundation, either version 3 of the License, or
-;;; (at your option) any later version.
-;;;
-;;; This program is distributed in the hope that it will be useful,
-;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;; GNU General Public License for more details.
-;;;
-;;; You should have received a copy of the GNU General Public License
-;;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
-
-(define-module (nonfree packages linux)
-  #:use-module (gnu packages linux)
-  #:use-module (guix packages)
-  #:use-module (guix download)
-  #:use-module (guix git-download)
-  #:use-module (guix build-system trivial)
-  #:use-module ((guix licenses) #:prefix license:))
-
-(define (linux-urls version)
-  "Return a list of URLS for Linux VERSION."
-  (let ((major-version (string-take version 1)))
-    (list (string-append "https://www.kernel.org/pub/linux/kernel/v"
-                         major-version ".x/linux-" version ".tar.xz"))))
-
-(define (corrupt-linux freedo version hash)
-  (package
-    (inherit freedo)
-    (name "linux")
-    (version version)
-    (source (origin
-              (method url-fetch)
-              (uri (linux-urls version))
-              (sha256 (base32 hash))))
-    (home-page "https://www.kernel.org/")
-    (synopsis "Linux kernel with nonfree binary blobs included")
-    (description
-     "The unmodified Linux kernel, including nonfree blobs, for running GuixSD
-on hardware which requires nonfree software to function.")))
-
-(define-public linux
-  (corrupt-linux linux-libre "5.1.5"
-                 "1nvdrzrqqx5whj8sfqrxn1xmxx64595j0iz2wkzgpglprbsr17yp"))
-
-(define-public linux-firmware
-  (let ((commit "92e17d0dd2437140fab044ae62baf69b35d7d1fa")
-        (revision "1"))
-    (package
-      (name "linux-firmware")
-      (version (string-append "20190502-" revision "."
-                              (string-take commit 7)))
-      (source (origin
-                (method git-fetch)
-                (uri (git-reference
-                      (url (string-append
-                            "https://git.kernel.org/pub/scm/"
-                            "linux/kernel/git/firmware/linux-firmware.git"))
-                      (commit commit)))
-                (file-name (git-file-name name version))
-                (sha256
-                 (base32
-                  "1bsgp124jhs9bbjjq0fzmdsziwx1y5aivkgpj8v56ar0y2zmrw2d"))))
-      (build-system trivial-build-system)
-      (arguments
-       `(#:modules ((guix build utils))
-         #:builder (begin
-                     (use-modules (guix build utils))
-                     (let ((source (assoc-ref %build-inputs "source"))
-                           (fw-dir (string-append %output "/lib/firmware/")))
-                       (mkdir-p fw-dir)
-                       (copy-recursively source fw-dir)
-                       #t))))
-      (home-page
-       "http://git.kernel.org/?p=linux/kernel/git/firmware/linux-firmware.git")
-      (synopsis "Non-free firmware blobs for Linux")
-      (description "Non-free firmware blobs for enabling support for various
-hardware in the Linux kernel.")
-      (license
-       (license:non-copyleft
-        (string-append "https://git.kernel.org/pub/scm/linux/kernel/git/"
-                       "firmware/linux-firmware.git/plain/WHENCE"))))))
-
-(define-public ath3k-firmware
-  (package
-   (inherit linux-firmware)
-   (name "ath3k-firmware")
-   (build-system trivial-build-system)
-   (arguments
-    `(#:modules ((guix build utils))
-      #:builder (begin
-                  (use-modules (guix build utils))
-                  (let ((source (assoc-ref %build-inputs "source"))
-                        (fw-dir (string-append %output "/lib/firmware")))
-                    (mkdir-p fw-dir)
-                    (copy-file (string-append source "/ath3k-1.fw")
-                               (string-append fw-dir "/ath3k-1.fw"))
-                    (copy-recursively (string-append source "/ar3k")
-                                      (string-append fw-dir "/ar3k"))
-                    #t))))
-   (synopsis "Non-free firmware blobs for the ath3k Bluetooth driver")
-   (description "Non-free firmware blobs for the ath3k Bluetooth driver. ath3k
-is the Linux Bluetooth driver for Atheros AR3011/AR3012 Bluetooth chipsets.")))