From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:470:142:3::10]:51381) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jOON2-0003rD-UP for guix-patches@gnu.org; Tue, 14 Apr 2020 12:25:14 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1jOOMx-0006h8-42 for guix-patches@gnu.org; Tue, 14 Apr 2020 12:25:08 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:51280) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1jOOMw-0006gt-8n for guix-patches@gnu.org; Tue, 14 Apr 2020 12:25:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1jOOMw-00012K-5f for guix-patches@gnu.org; Tue, 14 Apr 2020 12:25:02 -0400 Subject: [bug#40627] [PATCH] gnu: Add gtksheet. Resent-Message-ID: Received: from eggs.gnu.org ([2001:470:142:3::10]:51246) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jOOMV-0003iv-Px for guix-patches@gnu.org; Tue, 14 Apr 2020 12:24:42 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1jOOMO-0006U2-Ie for guix-patches@gnu.org; Tue, 14 Apr 2020 12:24:34 -0400 Received: from mugam.systemreboot.net ([139.59.75.54]:41116) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1jONkv-0004UC-2Z for guix-patches@gnu.org; Tue, 14 Apr 2020 11:45:46 -0400 From: Arun Isaac Date: Tue, 14 Apr 2020 21:15:35 +0530 Message-Id: <20200414154535.25800-1-arunisaac@systemreboot.net> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 40627@debbugs.gnu.org Cc: Arun Isaac * gnu/packages/gtk.scm (gtksheet): New variable. --- gnu/packages/gtk.scm | 78 +++++++++++++++++++++++++++++++++++++++++++- 1 file changed, 77 insertions(+), 1 deletion(-) diff --git a/gnu/packages/gtk.scm b/gnu/packages/gtk.scm index 4882a95eb8..8dd4901a98 100644 --- a/gnu/packages/gtk.scm +++ b/gnu/packages/gtk.scm @@ -18,7 +18,7 @@ ;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice ;;; Copyright © 2017 Marius Bakke ;;; Copyright © 2018 Alex Vong -;;; Copyright © 2018 Arun Isaac +;;; Copyright © 2018, 2020 Arun Isaac ;;; Copyright © 2018 Pierre Neidhardt ;;; Copyright © 2019 Meiyo Peng ;;; Copyright © 2019 Giacomo Leidi @@ -1967,3 +1967,79 @@ popovers.") library for drawing.") (home-page "https://wiki.gnome.org/GooCanvas") (license license:lgpl2.0))) + +(define-public gtksheet + (package + (name "gtksheet") + (version "4.3.3") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/fpaquet/gtksheet") + (commit (string-append "V" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1sa9q7w7q7620id1l9ci5favmcrm4y5yr99pbran4hd0sjka62gh")))) + (build-system gnu-build-system) + (arguments + `(#:configure-flags (list "--enable-glade" + "--enable-introspection") + #:phases + (modify-phases %standard-phases + ;; The "configure" script is present, but otherwise the project is + ;; not bootstrapped properly. Delete configure so the bootstrap phase + ;; will take over. + (add-after 'unpack 'delete-configure + (lambda _ + (delete-file "configure") + #t)) + ;; Fix glade install directories. + (add-before 'bootstrap 'configure-glade-directories + (lambda* (#:key outputs #:allow-other-keys) + (substitute* "configure.ac" + (("`\\$PKG_CONFIG --variable=catalogdir gladeui-2.0`") + (string-append (assoc-ref outputs "out") "/share/glade/catalogs")) + (("`\\$PKG_CONFIG --variable=moduledir gladeui-2.0`") + (string-append (assoc-ref outputs "out") "/lib/glade/modules")) + (("`\\$PKG_CONFIG --variable=pixmapdir gladeui-2.0`") + (string-append (assoc-ref outputs "out") "/share/pixmaps"))) + #t)) + ;; Fix incorrect typelib version. This is a known upstream bug. See + ;; https://github.com/fpaquet/gtksheet/issues/23 + (add-after 'install 'fix-typelib-version + (lambda* (#:key outputs #:allow-other-keys) + (let ((girepository (string-append (assoc-ref outputs "out") + "/lib/girepository-1.0"))) + (rename-file (string-append girepository "/GtkSheet-4.0.typelib") + (string-append girepository "/GtkSheet-4.3.2.typelib"))) + #t))))) + (inputs + `(("glade" ,glade3) + ("glib" ,glib) + ("gtk+" ,gtk+) + ("libxml2" ,libxml2))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake) + ("gobject-introspection" ,gobject-introspection) + ("libtool" ,libtool) + ("pkg-config" ,pkg-config))) + (home-page "https://fpaquet.github.io/gtksheet/") + (synopsis "Spreadsheet widget for GTK+") + (description "GtkSheet is a matrix widget for GTK+. It consists of an +scrollable grid of cells where you can allocate text. Cell contents can be +edited interactively through a specially designed entry, GtkItemEntry. It is +also a container subclass, allowing you to display buttons, images and any +other widget in it. You can also set many attributes such as border, +foreground and background colors, text justification and more.") + (native-search-paths + (list + (search-path-specification + (variable "GLADE_CATALOG_SEARCH_PATH") + (files '("share/glade/catalogs"))) + (search-path-specification + (variable "GLADE_MODULE_SEARCH_PATH") + (files '("lib/glade/modules"))))) + (license license:lgpl2.0+))) -- 2.26.0