02/14: gnu: gpsbabel: Complete licencing information.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 6d2ff64584f7fd2835f03148cbef87964a628999
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Mon Jan 15 07:28:47 2018 +0100

    gnu: gpsbabel: Complete licencing information.
    
    * gnu/packages/gps.scm (gpsbabel)[source]: Remove unused files in a snippet.
    [license]: Add expat.
---
 gnu/packages/gps.scm | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/gps.scm b/gnu/packages/gps.scm
index 2b652c7..760d985 100644
--- a/gnu/packages/gps.scm
+++ b/gnu/packages/gps.scm
@@ -1,6 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014, 2015 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2016, 2017 Efraim Flashner <address@hidden>
+;;; Copyright © 2018 Tobias Geerinckx-Rice <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,7 +47,15 @@
                     version ".orig.tar.gz"))
               (sha256
                (base32
-                "0xf7wmy2m29g2lm8lqc74yf8rf7sxfl3cfwbk7dpf0yf42pb0b6w"))))
+                "0xf7wmy2m29g2lm8lqc74yf8rf7sxfl3cfwbk7dpf0yf42pb0b6w"))
+              (snippet
+               '(begin
+                  ;; Delete files under GPL-compatible licences but never used
+                  ;; on GNU systems, rather than bloating the LICENSE field.
+                  (with-directory-excursion "gpsbabel"
+                    (delete-file "gui/serial_mac.cc")           ; Apple MIT
+                    (delete-file "mingw/include/ddk/hidsdi.h")) ; public domain
+                  #t))))
     (build-system gnu-build-system)
     (arguments
      `(#:configure-flags
@@ -84,7 +93,8 @@ popular GPS receivers and mapping programs.  It contains 
extensive data
 manipulation abilities making it a convenient for server-side processing or as
 the back-end for other tools.  It does not convert, transfer, send, or
 manipulate maps.")
-    (license license:gpl2+)))
+    (license (list license:expat        ; shapelib/*.[ch]
+                   license:gpl2+))))    ; everything else
 
 (define-public gpscorrelate
   ;; This program is "lightly maintained", so to speak, so we end up taking it