X-Git-Url: https://git.hcoop.net/jackhill/guix/guix.git/blobdiff_plain/adbd7bd64f95fd130cdaf17b480ff8596b709cb6..ffe714b5f441ca22d69ecef34bdbb8e61bf758c4:/gnu/packages/gxmessage.scm

diff --git a/gnu/packages/gxmessage.scm b/gnu/packages/gxmessage.scm
index 649b9d4030..0150dd0d6f 100644
--- a/gnu/packages/gxmessage.scm
+++ b/gnu/packages/gxmessage.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014 John Darrington <jmd@gnu.org>
+;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -29,20 +30,29 @@
 (define-public gxmessage
   (package
     (name "gxmessage")
-    (version "2.20.1")
+    (version "3.4.3")
     (source (origin
              (method url-fetch)
              (uri (string-append "mirror://gnu/gxmessage/gxmessage-"
                                  version ".tar.gz"))
              (sha256
-              (base32 "1b75qjx339c7q0xfxnwb2n5vw6xn8vi6nw2clggfzxnwwx58g2d1"))))
+              (base32 "01ggvvp0nyn8xczh93icifnji468wsjgqzd1f1bixwsqziaicknv"))))
     (build-system gnu-build-system)
+    (arguments
+     '(#:phases
+       (modify-phases %standard-phases
+         (add-before 'install 'skip-gtk-update-icon-cache
+           ;; Don't create 'icon-theme.cache'.
+           (lambda _
+             (substitute* "Makefile"
+               (("gtk-update-icon-cache") "true"))
+             #t)))))
     (inputs
-     `(("gtk+" ,gtk+-2)))
+     `(("gtk+" ,gtk+)))
     (native-inputs
      `(("intltool" ,intltool)
        ("pkg-config" ,pkg-config)))
-    (home-page "http://www.gnu.org/software/gxmessage/")
+    (home-page "https://www.gnu.org/software/gxmessage/")
     (synopsis "Open popup message window with buttons for return")
     (description "GNU gxmessage is a program that pops up dialog windows, which display
 a message to the user and waits for their action.  The program then exits