03/22: gnu: minetest: New package module.

[guix-commits]

leoprikler pushed a commit to branch master
in repository guix.

commit 7b9d5b6ca023647158bdc0be18ff0f6412097c41
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Tue Aug 10 17:07:17 2021 +0200

    gnu: minetest: New package module.
    
    Aside from the 'minetest-topic' procedure which will be used
    for the 'home-page' field of some packages, this module is
    currently empty.  The 'contentdb' importer defined in the
    following patches will be used to populate this module.
    
    * gnu/packages/minetest.scm: New file.
    * gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
    
    Signed-off-by: Leo Prikler <leo.prikler@student.tugraz.at>
---
 gnu/local.mk              |  1 +
 gnu/packages/minetest.scm | 26 ++++++++++++++++++++++++++
 2 files changed, 27 insertions(+)

diff --git a/gnu/local.mk b/gnu/local.mk
index 3dd9bb5..14cd1cc 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -383,6 +383,7 @@ GNU_SYSTEM_MODULES =                                \
   %D%/packages/mercury.scm                     \
   %D%/packages/mes.scm                         \
   %D%/packages/messaging.scm                   \
+  %D%/packages/minetest.scm                    \
   %D%/packages/mingw.scm                       \
   %D%/packages/microcom.scm                    \
   %D%/packages/moe.scm                         \
diff --git a/gnu/packages/minetest.scm b/gnu/packages/minetest.scm
new file mode 100644
index 0000000..f8aca30
--- /dev/null
+++ b/gnu/packages/minetest.scm
@@ -0,0 +1,26 @@
+;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be>
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix 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.
+;;;
+;;; GNU Guix 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 GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+(define-module (gnu packages minetest)
+  #:use-module (guix packages)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system minetest)
+  #:use-module ((guix licenses) #:prefix license:))
+
+(define-public (minetest-topic topic-id)
+  "Return an URL (as a string) pointing to the forum topic with
+numeric identifier TOPIC-ID on the official Minetest forums."
+  (string-append "https://forum.minetest.net/viewtopic.php?t=";
+                 (number->string topic-id)))