Subject: [bug#30970] Add package definition for screen message

From: Ton <[email-masked]>
Date: Thu, 29 Mar 2018 12:01:18 +0200

Here is a new patch with the requested changes.
From b993e9eb9ed2d7c1d8ca80a33d046c7ccf54be32 Mon Sep 17 00:00:00 2001
From: Tonton <[email-masked]>
Date: Thu, 29 Mar 2018 11:38:11 +0200
Subject: [PATCH] * gnu/packages/xdisorg.scm (screen-message): New variable

Signed-off-by: Tonton <[email-masked]>
---
 gnu/packages/xdisorg.scm | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index 6663a0e74..66f29a8b6 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -21,6 +21,7 @@
 ;;; Copyright © 2017 Tobias Geerinckx-Rice <[email-masked]>
 ;;; Copyright © 2017 Marek Benc <[email-masked]>
 ;;; Copyright © 2017 Mike Gerwitz <[email-masked]>
+;;; Copyright © 2018 Thomas Sigurdsen <[email-masked]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1408,3 +1409,34 @@ or playing a PCM encoded WAVE file.")
 System, and launches a program of your choice if there is no activity after
 a user-configurable period of time.")
     (license license:gpl2)))
+
+(define-public screen-message
+  (package
+    (name "screen-message")
+    (version "0.25")
+    (source (origin
+              (method url-fetch)
+              (uri
+               (string-append
+                "https://www.joachim-breitner.de/archive/screen-message/screen-message-"
+                                  version ".tar.gz"))
+              (sha256
+               (base32
+                "1lw955qq5pq010lzmaf32ylj2iprgsri9ih4hx672c3f794ilab0"))))
+    (build-system gnu-build-system)
+    (inputs `(("gtk3" ,gtk+)
+              ("gdk" ,gdk-pixbuf)
+              ("pango" ,pango)))
+    (native-inputs `(("pkg-config" ,pkg-config)))
+    (arguments
+     ;; The default configure puts the 'sm' binary in games/ instead of bin/ -
+     ;; this fixes it:
+     `(#:make-flags (list (string-append "execgamesdir=" %output "/bin"))))
+    (synopsis "Print messages on your screen")
+    (description "@code{screen-message} is a tool for displaying text on
+your screen.  It will make the text as large as possible and display it
+with black color on a white background (colors are configurable on the
+commandline).")
+    (home-page "https://www.joachim-breitner.de/projects#screen-message")
+    (license license:gpl2+)))
+
-- 
2.16.3