all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Cyril Roelandt <tipecaml@gmail.com>
To: guix-devel@gnu.org
Subject: [PATCH 6/6] gnu: Add eog.
Date: Sat, 30 Nov 2013 02:13:36 +0100	[thread overview]
Message-ID: <1385774016-1418-7-git-send-email-tipecaml@gmail.com> (raw)
In-Reply-To: <1385774016-1418-1-git-send-email-tipecaml@gmail.com>

* gnu/packages/gnome.scm (eog): New variable.
---
 gnu/packages/gnome.scm | 71 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 7d483be..029f756 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -21,6 +21,7 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix build-system gnu)
+  #:use-module (gnu packages compression)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages gnupg)
   #:use-module (gnu packages gstreamer)
@@ -34,6 +35,7 @@
   #:use-module (gnu packages perl)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages python)
+  #:use-module (gnu packages shared-mime-info)
   #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg))
 
@@ -72,6 +74,75 @@ Desktop.  It is designed to be as simple as possible and has some unique
 features to enable users to create their discs easily and quickly.")
     (license gpl2+)))
 
+(define-public eog
+  (package
+    (name "eog")
+    (version "3.10.0")
+    (source (origin
+             (method url-fetch)
+             (uri (string-append "mirror://gnome/sources/eog/"
+                   (string-copy version 0 (string-rindex version #\.)) "/"
+                   "eog-" version ".tar.xz"))
+             (sha256
+              (base32
+               "1nm126gskhq7p2b2a8vl7sc5rvgzyah7hxzikafhnimcm3xsnjfl"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(; TODO: The compilation fails when using libjpeg. Find why.
+       #:configure-flags '("--without-libjpeg")
+       #:phases
+        (alist-replace
+         'configure
+         (lambda* (#:key inputs #:allow-other-keys #:rest args)
+          (let ((configure (assoc-ref %standard-phases 'configure))
+                (gir-path (lambda (pkg-name)
+                           (string-append
+                            (assoc-ref inputs pkg-name)
+                            "/share/gir-1.0"))))
+           (substitute* "src/Makefile.in"
+            (("@HAVE_INTROSPECTION_TRUE@INTROSPECTION_SCANNER_ARGS")
+             (string-append
+              "@HAVE_INTROSPECTION_TRUE@INTROSPECTION_COMPILER_ARGS ="
+              " --includedir=" (gir-path "atk")
+              " --includedir=" (gir-path "gdk-pixbuf")
+              " --includedir=" (gir-path "gtk+")
+              " --includedir=" (gir-path "pango")
+              "\n@HAVE_INTROSPECTION_TRUE@INTROSPECTION_SCANNER_ARGS ="
+              " --add-include-path=" (gir-path "atk")
+              " --add-include-path=" (gir-path "gdk-pixbuf")
+              " --add-include-path=" (gir-path "gtk+")
+              " --add-include-path=" (gir-path "pango"))))
+           (apply configure args)))
+         %standard-phases)))
+    (inputs
+     `(("atk" ,atk)
+       ("gdk-pixbuf" ,gdk-pixbuf)
+       ("glib" ,glib)
+       ("gnome-desktop" ,gnome-desktop)
+       ("gnome-icon-theme" ,gnome-icon-theme)
+       ("gobject-introspection" ,gobject-introspection)
+       ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
+       ("gtk+" ,gtk+)
+       ("intltool" ,intltool)
+       ("itstool" ,itstool)
+       ("libffi" ,libffi)
+       ("libpeas" ,libpeas)
+       ("libxkbfile" ,libxkbfile)
+       ("pango" ,pango)
+       ("pkg-config" ,pkg-config)
+       ("shared-mime-info" ,shared-mime-info)
+       ("zlib" ,zlib)))
+    (home-page "https://projects.gnome.org/eog/")
+    (synopsis "The Eye of GNOME image viewer.")
+    (description
+     "The Eye of GNOME image viewer is the official image viewer for the GNOME
+Desktop environment. With it, you can view single image files, as well as large
+image collections.
+
+The Eye of GNOME supports a variety of image file formats. The GdkPixbuf
+library determines which file formats Eye of GNOME can load and save.")
+    (license gpl2+)))
+
 (define-public gnome-desktop
   (package
     (name "gnome-desktop")
-- 
1.8.4.rc3

  parent reply	other threads:[~2013-11-30  1:13 UTC|newest]

Thread overview: 41+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-11-30  1:13 [PATCH 0/6] Add eog Cyril Roelandt
2013-11-30  1:13 ` [PATCH 1/6] gnu: gobject-introspection: look for 'gcc' when no compiler seems available Cyril Roelandt
2013-11-30 21:59   ` Ludovic Courtès
2013-12-01  3:15     ` Cyril Roelandt
2013-12-01 22:11       ` Ludovic Courtès
2013-11-30  1:13 ` [PATCH 2/6] gnu: gtk+: enable introspection Cyril Roelandt
2013-11-30 22:01   ` Ludovic Courtès
2013-12-01  3:43     ` Cyril Roelandt
2013-12-01 22:12       ` Ludovic Courtès
2013-12-07 15:11         ` Cyril Roelandt
2013-12-07 15:27           ` Ludovic Courtès
2013-12-08 20:32             ` [PATCH 2/6 v2] " Cyril Roelandt
2013-12-08 23:53               ` Ludovic Courtès
2013-12-10 23:43                 ` [PATCH 2/6 v3] " Cyril Roelandt
2013-12-11 21:09                   ` Ludovic Courtès
2013-11-30  1:13 ` [PATCH 3/6] gnu: Add libpeas Cyril Roelandt
2013-11-30 22:03   ` Ludovic Courtès
2013-12-01  3:45     ` Cyril Roelandt
2013-12-01 22:13       ` Ludovic Courtès
2013-12-08 20:33         ` [PATCH 3/6 v2] " Cyril Roelandt
2013-12-08 23:55           ` Ludovic Courtès
2013-12-10 23:44             ` [PATCH 3/6 v6] " Cyril Roelandt
2013-12-11 21:10               ` Ludovic Courtès
2013-11-30  1:13 ` [PATCH 4/6] gnu: Add iso-codes Cyril Roelandt
2013-11-30 22:05   ` Ludovic Courtès
2013-12-01  3:47     ` Cyril Roelandt
2013-12-01 22:13       ` Ludovic Courtès
2013-12-08 20:33         ` [PATCH 4/6 v2] " Cyril Roelandt
2013-12-08 23:55           ` Ludovic Courtès
2013-11-30  1:13 ` [PATCH 5/6] gnu: Add gnome-desktop Cyril Roelandt
2013-11-30 22:07   ` Ludovic Courtès
2013-12-08 20:34     ` [PATCH 5/6 v2] " Cyril Roelandt
2013-12-08 23:57       ` Ludovic Courtès
2013-12-09  0:06         ` Cyril Roelandt
2013-12-09 17:34           ` Ludovic Courtès
2013-12-10 23:44             ` [PATCH 5/6 v3] " Cyril Roelandt
2013-12-11 21:11               ` Ludovic Courtès
2013-12-12  6:07                 ` John Darrington
2013-12-12 21:22                   ` Ludovic Courtès
2013-11-30  1:13 ` Cyril Roelandt [this message]
2013-11-30 22:06   ` [PATCH 6/6] gnu: Add eog Ludovic Courtès

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

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

  git send-email \
    --in-reply-to=1385774016-1418-7-git-send-email-tipecaml@gmail.com \
    --to=tipecaml@gmail.com \
    --cc=guix-devel@gnu.org \
    /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 external index

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

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.