unofficial mirror of bug-guix@gnu.org 
 help / color / mirror / code / Atom feed
From: Liliana Marie Prikler <liliana.prikler@gmail.com>
To: Maxime Devos <maximedevos@telenet.be>
Cc: 54691@debbugs.gnu.org
Subject: bug#54691: [PATCH v2 2/5] gnu: Add fortunes-jkirchartz.
Date: Sat, 23 Jul 2022 17:11:16 +0200	[thread overview]
Message-ID: <f77a2569333d5c26a4ef0a8729801741bf24f016.camel@gmail.com> (raw)
In-Reply-To: <3fc3794df2d837c16ce768594c3ea9086b5f0abf.camel@telenet.be>

* gnu/packages/toys.scm (fortunes-jkirchartz): New variable.
---
 gnu/packages/toys.scm | 51 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)

diff --git a/gnu/packages/toys.scm b/gnu/packages/toys.scm
index 45eb74ecbc..28131314ae 100644
--- a/gnu/packages/toys.scm
+++ b/gnu/packages/toys.scm
@@ -23,6 +23,7 @@
 
 (define-module (gnu packages toys)
   #:use-module (gnu packages)
+  #:use-module (gnu packages base)
   #:use-module (gnu packages bison)
   #:use-module (gnu packages flex)
   #:use-module (gnu packages gtk)
@@ -35,8 +36,10 @@ (define-module (gnu packages toys)
   #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg)
   #:use-module (guix build-system gnu)
+  #:use-module (guix build-system copy)
   #:use-module (guix build-system meson)
   #:use-module (guix download)
+  #:use-module (guix gexp)
   #:use-module (guix git-download)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
@@ -69,6 +72,54 @@ (define-public daikichi
             (variable "DAIKICHI_FORTUNE_PATH")
             (files '("share/fortunes")))))))
 
+(define-public fortunes-jkirchartz
+  ;; No public release.
+  ;; Note to updaters: Please ensure that new quotes do not bring harm
+  ;; rather than fortune.
+  (let ((commit "2e32ba0a57e3842dc06c8128d880ab4c8ec3aefc")
+        (revision "0"))
+    (package
+      (name "fortunes-jkirchartz")
+      (version (git-version "0" revision commit))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://github.com/JKirchartz/fortunes")
+                      (commit commit)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "1ym4ldzww5yfd76q7zvhi491bqlykfjnc215bqx1cbj0c8ndb2l4"))
+                (snippet
+                 #~(for-each delete-file
+                             ;; incompatible license
+                             '("BibleAbridged")))))
+      (build-system copy-build-system)
+      ;; Cross-compile with care, daikichi does not guarantee that the target
+      ;; can actually read the fortunes.
+      (native-inputs (list daikichi gnu-make))
+      (arguments
+       (list #:install-plan
+             #~`(("." "share/fortunes" #:include-regexp ("\\.dat$")))
+             #:phases
+             #~(modify-phases %standard-phases
+                 (add-after 'unpack 'patch-source
+                   (lambda* (#:key inputs native-inputs #:allow-other-keys)
+                     (substitute* "showerthoughts"
+                       (("&lt;") "<")
+                       (("&gt;") ">")
+                       (("&amp;") "&"))
+                     (substitute* "Makefile"
+                       (("strfile") "daikichi pack"))))
+                 (add-before 'install 'build
+                   (lambda _
+                     (invoke "make"))))))
+      (home-page "https://github.com/JKirchartz/fortunes")
+      (synopsis "Collection of fortunes")
+      (description "This package contains a large collection of quotes to
+display via @command{fortune}, drawn from sources all around the world.")
+      (license license:unlicense))))
+
 (define-public lolcat
   (let ((commit "35dca3d0a381496d7195cd78f5b24aa7b62f2154")
         (revision "0"))
-- 
2.37.0





  parent reply	other threads:[~2022-07-23 22:22 UTC|newest]

Thread overview: 52+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2022-04-03 13:09 bug#54691: fortune-mod propagates various non-nice things Maxime Devos
2022-04-03 17:26 ` Liliana Marie Prikler
2022-04-03 18:12   ` Maxime Devos
2022-04-03 18:41   ` Maxime Devos
2022-04-04 10:41   ` Maxime Devos
2022-07-19 19:20   ` Maxime Devos
2022-07-20  4:31     ` Liliana Marie Prikler
2022-07-20  8:45       ` Maxime Devos
2022-07-20 16:57         ` Liliana Marie Prikler
2022-07-20 18:50           ` Maxime Devos
2022-04-03 18:20 ` Maxime Devos
2022-07-14  1:30 ` Maxim Cournoyer
2022-07-14 13:00   ` Csepp
2022-07-14 14:55     ` Maxim Cournoyer
2022-07-19 18:54       ` Maxime Devos
2022-07-19 19:45   ` Maxime Devos
2022-07-23 15:06 ` bug#54691: [PATCH v2 1/5] gnu: Add daikichi Liliana Marie Prikler
2022-07-23 15:06 ` bug#54691: [PATCH " Liliana Marie Prikler
2022-07-23 15:06 ` bug#54691: [PATCH v3 2/6] " Liliana Marie Prikler
2022-07-23 15:11 ` bug#54691: [PATCH v3 3/6] gnu: Add fortunes-jkirchartz Liliana Marie Prikler
2022-07-23 15:11 ` bug#54691: [PATCH 2/5] " Liliana Marie Prikler
2022-07-23 19:54   ` Maxime Devos
2022-07-23 20:43     ` Liliana Marie Prikler
2022-07-23 21:41       ` Maxime Devos
2022-07-23 21:52         ` Liliana Marie Prikler
2022-07-23 22:13           ` Maxime Devos
2022-07-23 19:56   ` Maxime Devos
2022-07-23 20:53     ` Liliana Marie Prikler
2022-07-23 22:01       ` Maxime Devos
2022-07-24  1:09       ` bokr
2022-07-23 15:11 ` Liliana Marie Prikler [this message]
2022-07-23 15:13 ` bug#54691: [PATCH v3 4/6] gnu: Remove fortune-mod Liliana Marie Prikler
2022-07-23 15:13 ` bug#54691: [PATCH 3/5] " Liliana Marie Prikler
2022-07-23 19:58   ` Maxime Devos
2022-07-23 20:54     ` Liliana Marie Prikler
2022-07-23 15:13 ` bug#54691: [PATCH v2 " Liliana Marie Prikler
     [not found]   ` <87y1w5sarm.fsf_-_@gnu.org>
2022-08-03 17:09     ` bug#54691: fortune-mod propagates various non-nice things Liliana Marie Prikler
2022-08-04 12:23       ` Ludovic Courtès
2022-08-04 15:37         ` [bug#56599] " Tobias Geerinckx-Rice via Guix-patches via
2022-08-04 17:12           ` Liliana Marie Prikler
2022-08-04 19:58             ` Tobias Geerinckx-Rice via Bug reports for GNU Guix
     [not found]               ` <20220806230112.GA16948@LionPure>
2022-08-06 23:05                 ` Maxime Devos
2022-07-23 15:16 ` bug#54691: [PATCH v2 4/5] gnu: Remove rinutils Liliana Marie Prikler
2022-07-24 10:33   ` paren--- via Bug reports for GNU Guix
2022-07-24 11:27     ` Liliana Marie Prikler
2022-07-23 15:16 ` bug#54691: [PATCH " Liliana Marie Prikler
2022-07-23 15:16 ` bug#54691: [PATCH v3 5/6] " Liliana Marie Prikler
2022-07-23 15:17 ` bug#54691: [PATCH v2 5/5] gnu: Remove shlomif-cmake-modules Liliana Marie Prikler
2022-07-23 15:17 ` bug#54691: [PATCH v3 6/6] " Liliana Marie Prikler
2022-07-23 15:17 ` bug#54691: [PATCH 5/5] " Liliana Marie Prikler
2022-08-13  9:26 ` bug#54691: [PATCH v3 1/6] build-system: copy: Support #:tests? Liliana Marie Prikler
2022-08-28 22:16   ` Liliana Marie Prikler

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://guix.gnu.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=f77a2569333d5c26a4ef0a8729801741bf24f016.camel@gmail.com \
    --to=liliana.prikler@gmail.com \
    --cc=54691@debbugs.gnu.org \
    --cc=maximedevos@telenet.be \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).