diff options
Diffstat (limited to 'gnu/packages')
-rw-r--r-- | gnu/packages/fontutils.scm | 10 | ||||
-rw-r--r-- | gnu/packages/gnupg.scm | 16 | ||||
-rw-r--r-- | gnu/packages/mail.scm | 5 | ||||
-rw-r--r-- | gnu/packages/maths.scm | 4 | ||||
-rw-r--r-- | gnu/packages/package-management.scm | 22 | ||||
-rw-r--r-- | gnu/packages/scheme.scm | 20 | ||||
-rw-r--r-- | gnu/packages/xorg.scm | 46 | ||||
-rw-r--r-- | gnu/packages/zile.scm | 34 |
8 files changed, 117 insertions, 40 deletions
diff --git a/gnu/packages/fontutils.scm b/gnu/packages/fontutils.scm index 8b5e9c582a..ac0dbdf9d5 100644 --- a/gnu/packages/fontutils.scm +++ b/gnu/packages/fontutils.scm @@ -19,6 +19,7 @@ (define-module (gnu packages fontutils) #:use-module (gnu packages) #:use-module (gnu packages compression) + #:use-module (gnu packages ghostscript) #:use-module (gnu packages pkg-config) #:use-module (gnu packages xml) #:use-module ((guix licenses) #:renamer (symbol-prefix-proc 'license:)) @@ -75,11 +76,16 @@ anti-aliased glyph bitmap generation with 256 gray levels.") (build-system gnu-build-system) (inputs `(("expat" ,expat) ("freetype" ,freetype) + ("gs-fonts" ,gs-fonts) ("pkg-config" ,pkg-config))) (arguments `(#:configure-flags - ;; point to user profile instead of /usr/share/fonts in /etc/fonts.conf - `("--with-default-fonts=~/.guix-profile/share/fonts"))) + ;; point to user profile instead of /usr/share/fonts in /etc/fonts.conf + (list "--with-default-fonts=~/.guix-profile/share/fonts" + ;; register gs-fonts + (string-append "--with-add-fonts=" + (assoc-ref %build-inputs "gs-fonts") + "/share/fonts")))) (synopsis "Fontconfig, a library for configuring and customising font access.") (description "Fontconfig can discover new fonts when installed automatically; diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm index 7c0f50900a..c098db3315 100644 --- a/gnu/packages/gnupg.scm +++ b/gnu/packages/gnupg.scm @@ -57,14 +57,14 @@ Daemon and possibly more in the future.") (define-public libgcrypt (package (name "libgcrypt") - (version "1.5.2") + (version "1.5.3") (source (origin (method url-fetch) (uri (string-append "mirror://gnupg/libgcrypt/libgcrypt-" version ".tar.bz2")) (sha256 (base32 - "0gwnzqd64cpwdmk93nll54nidsr74jpimxzj4p4z7502ylwl66p4")))) + "1lar8y3lh61zl5flljpz540d78g99h4d5idfwrfw8lm3gm737xdw")))) (build-system gnu-build-system) (propagated-inputs `(("libgpg-error" ,libgpg-error))) @@ -106,7 +106,7 @@ provided.") (define-public libksba (package (name "libksba") - (version "1.2.0") + (version "1.3.0") (source (origin (method url-fetch) @@ -115,7 +115,7 @@ provided.") version ".tar.bz2")) (sha256 (base32 - "0jwk7hm3x3g4hd7l12z3d79dy7359x7lc88dq6z7q0ixn1jwxbq9")))) + "0w8rfb6yhcwkwzvjafrashcygy4hd9xwwmvlnkfd1m2h0paywqas")))) (build-system gnu-build-system) (propagated-inputs `(("libgpg-error" ,libgpg-error))) @@ -131,7 +131,7 @@ specifications are building blocks of S/MIME and TLS.") (define-public gnupg (package (name "gnupg") - (version "2.0.20") + (version "2.0.21") (source (origin (method url-fetch) @@ -139,12 +139,10 @@ specifications are building blocks of S/MIME and TLS.") ".tar.bz2")) (sha256 (base32 - "16mp0j5inrcqcb3fxbn0b3aamascy3n923wiy0y8marc0rzrp53f")))) + "1xgf1q1phdawk6y66haaqcvfnlsqk12jmjin1m2d5x6fqw18kpq0")))) (build-system gnu-build-system) (inputs - `(;; TODO: Add missing optional dep libusb. -;; ("libusb" ,libusb) - ("bzip2" ,guix:bzip2) + `(("bzip2" ,guix:bzip2) ("curl" ,curl) ("libassuan" ,libassuan) ("libgcrypt" ,libgcrypt) diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm index b8ddcd71e1..a6236e7698 100644 --- a/gnu/packages/mail.scm +++ b/gnu/packages/mail.scm @@ -19,6 +19,7 @@ (define-module (gnu packages mail) #:use-module (gnu packages) #:use-module (gnu packages autotools) + #:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages dejagnu) #:use-module (gnu packages gdbm) #:use-module (gnu packages gnutls) @@ -154,7 +155,8 @@ aliasing facilities to work just as they would on normal mail.") "1864cwz240gh0zy56fb47qqzwyf6ghg01037rb4p2kqgimpg6h91")))) (build-system gnu-build-system) (inputs - `(("ncurses" ,ncurses) + `(("cyrus-sasl" ,cyrus-sasl) + ("ncurses" ,ncurses) ("openssl" ,openssl) ("perl" ,perl))) (arguments @@ -162,6 +164,7 @@ aliasing facilities to work just as they would on normal mail.") "--enable-imap" "--enable-pop" "--with-ssl" + "--with-sasl" ;; so that mutt does not check whether the path ;; exists, which it does not in the chroot "--with-mailpath=/var/mail"))) diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm index 75354122b5..c72d6074ab 100644 --- a/gnu/packages/maths.scm +++ b/gnu/packages/maths.scm @@ -108,7 +108,7 @@ extensive test suite.") (define-public pspp (package (name "pspp") - (version "0.8.0a") + (version "0.8.1") (source (origin (method url-fetch) @@ -116,7 +116,7 @@ extensive test suite.") version ".tar.gz")) (sha256 (base32 - "1pgkb3z8b4wk4gymnafclhkrqq7n05wq83mra3v53jdl6bnllmyq")))) + "0qhxsdbwxd3cn1shc13wxvx2lg32lp4z6sz24kv3jz7p5xfi8j7x")))) (build-system gnu-build-system) (inputs `(("gettext" ,gnu:gettext) diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm index e4eb082230..ccd15cef6f 100644 --- a/gnu/packages/package-management.scm +++ b/gnu/packages/package-management.scm @@ -22,7 +22,7 @@ #:use-module (guix build-system gnu) #:use-module ((guix licenses) #:select (gpl3+)) #:use-module (gnu packages guile) - #:use-module ((gnu packages compression) #:select (bzip2)) + #:use-module ((gnu packages compression) #:select (bzip2 gzip)) #:use-module (gnu packages gnupg) #:use-module (gnu packages sqlite) #:use-module (gnu packages pkg-config)) @@ -41,6 +41,7 @@ (build-system gnu-build-system) (arguments `(#:configure-flags (list + "--localstatedir=/var" (string-append "--with-libgcrypt-prefix=" (assoc-ref %build-inputs "libgcrypt"))) @@ -70,6 +71,8 @@ "/20130105/guile-2.0.7.tar.xz")) (sha256 hash))))) `(("bzip2" ,bzip2) + ("gzip" ,gzip) + ("sqlite" ,sqlite) ("libgcrypt" ,libgcrypt) ("guile" ,guile-2.0) @@ -100,3 +103,20 @@ A user-land free software distribution for GNU/Linux comes as part of Guix. Guix is based on the Nix package manager.") (license gpl3+))) + +(define-public guix-0.4 + ;; XXX: Hack to allow the use of a 0.4ish tarball. This assumes that you + ;; have run 'make dist' in your build tree. Remove when 0.4 is out. + (let* ((builddir (dirname + (canonicalize-path + (dirname (search-path %load-path + "guix/config.scm"))))) + (tarball (string-append builddir "/guix-0.4.tar.gz"))) + (package (inherit guix) + (version "0.4rc") + (source (if (file-exists? tarball) + tarball + (begin + (format (current-error-port) + "warning: 'guix-0.4.tar.gz' not found~%") + (package-source guix))))))) diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm index 43853fa08c..b7df902136 100644 --- a/gnu/packages/scheme.scm +++ b/gnu/packages/scheme.scm @@ -32,6 +32,7 @@ #:use-module (gnu packages avahi) #:use-module (gnu packages libphidget) #:use-module (gnu packages glib) + #:use-module (gnu packages gtk) #:use-module (gnu packages libffi) #:use-module (gnu packages libjpeg) #:use-module ((gnu packages gtk) #:select (cairo pango)) @@ -358,12 +359,15 @@ implementation techniques and as an expository tool.") '(#:phases (let* ((gui-libs (lambda (inputs) - ;; FIXME: Add GTK+ and GDK for DrRacket. - (let ((glib (string-append (assoc-ref inputs "glib") "/lib")) - (cairo (string-append (assoc-ref inputs "cairo") "/lib")) - (pango (string-append (assoc-ref inputs "pango") "/lib")) - (libjpeg (string-append (assoc-ref inputs "libjpeg") "/lib"))) - (list glib cairo pango libjpeg))))) + (define (lib input) + (string-append (assoc-ref inputs input) "/lib")) + + (list (lib "glib") + (lib "cairo") + (lib "pango") + (lib "libjpeg") + (lib "gtk") + (lib "gdk-pixbuf"))))) (alist-cons-before 'configure 'pre-configure (lambda* (#:key inputs #:allow-other-keys) @@ -397,7 +401,9 @@ implementation techniques and as an expository tool.") ("glib" ,glib) ; for DrRacket ("cairo" ,cairo) ("pango" ,pango) - ("libjpeg" ,libjpeg-8))) + ("libjpeg" ,libjpeg-8) + ("gdk-pixbuf" ,gdk-pixbuf) + ("gtk" ,gtk+))) (home-page "http://racket-lang.org") (synopsis "Implementation of Scheme and related languages") (description diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm index 0659c8d10c..613e2c5f0e 100644 --- a/gnu/packages/xorg.scm +++ b/gnu/packages/xorg.scm @@ -29,11 +29,11 @@ #:use-module ((gnu packages gettext) #:renamer (symbol-prefix-proc 'gnu:)) #:use-module (gnu packages glib) + #:use-module (gnu packages gnupg) #:use-module (gnu packages gperf) #:use-module (gnu packages libpng) #:use-module (gnu packages linux) #:use-module (gnu packages m4) - #:use-module (gnu packages openssl) #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) #:use-module (gnu packages python) @@ -3114,9 +3114,9 @@ tracking.") (license license:x11))) -(define-public xkbcomp +(define xkbcomp-intermediate ; used as input for xkeyboard-config (package - (name "xkbcomp") + (name "xkbcomp-intermediate") (version "1.2.4") (source (origin @@ -3139,6 +3139,18 @@ tracking.") (description "X.org provides an implementation of the X Window System") (license license:x11))) +(define-public xkbcomp ; using xkeyboard-config as input + (package (inherit xkbcomp-intermediate) + (name "xkbcomp") + (inputs + `(,@(package-inputs xkbcomp-intermediate) + ("xkeyboard-config" ,xkeyboard-config))) + (arguments + `(#:configure-flags + (list (string-append "--with-xkb-config-root=" + (assoc-ref %build-inputs "xkeyboard-config") + "/share/X11/xkb")))))) + (define-public xkbevd (package @@ -3212,7 +3224,7 @@ tracking.") ("intltool" ,intltool) ("libx11" ,libx11) ("pkg-config" ,pkg-config) - ("xkbcomp" ,xkbcomp))) + ("xkbcomp-intermediate" ,xkbcomp-intermediate))) (home-page "http://www.x.org/wiki/") (synopsis "xorg implementation of the X Window System") (description "X.org provides an implementation of the X Window System") @@ -4262,6 +4274,7 @@ emulation to complete hardware acceleration for modern GPUs.") ("dbus" ,dbus) ("dmxproto" ,dmxproto) ("libdmx" ,libdmx) + ("libgcrypt" ,libgcrypt) ("libxau" ,libxau) ("libxaw" ,libxaw) ("libxdmcp" ,libxdmcp) @@ -4273,7 +4286,6 @@ emulation to complete hardware acceleration for modern GPUs.") ("libxt" ,libxt) ("libxv" ,libxv) ("mesa" ,mesa) - ("openssl" ,openssl) ("pkg-config" ,pkg-config) ("python" ,python-wrapper) ("recordproto" ,recordproto) @@ -4284,10 +4296,30 @@ emulation to complete hardware acceleration for modern GPUs.") ("xf86dgaproto" ,xf86dgaproto) ("xf86driproto" ,xf86driproto) ("xf86vidmodeproto" ,xf86vidmodeproto) -;; ("xkbutils" ,xkbutils) -;; ("xkeyboard-config" ,xkeyboard-config) + ("xkbcomp" ,xkbcomp) + ("xkeyboard-config" ,xkeyboard-config) ("xtrans" ,xtrans) ("zlib" ,zlib))) + (arguments + `(#:configure-flags + (list (string-append "--with-xkb-path=" + (assoc-ref %build-inputs "xkeyboard-config") + "/share/X11/xkb") + (string-append "--with-xkb-output=" + "/tmp") ; FIXME: This is a bit doubtful; where should + ; the compiled keyboard maps go? + (string-append "--with-xkb-bin-directory=" + (assoc-ref %build-inputs "xkbcomp") + "/bin")) + #:phases + (alist-replace + 'configure + (lambda* (#:key outputs #:allow-other-keys #:rest args) + (let ((configure (assoc-ref %standard-phases 'configure))) + (substitute* (find-files "." "\\.c$") + (("/bin/sh") (which "sh"))) + (apply configure args))) + %standard-phases))) (home-page "http://www.x.org/wiki/") (synopsis "xorg implementation of the X Window System") (description "X.org provides an implementation of the X Window System") diff --git a/gnu/packages/zile.scm b/gnu/packages/zile.scm index 6e540ccfab..4907031c89 100644 --- a/gnu/packages/zile.scm +++ b/gnu/packages/zile.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2012 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2012, 2013 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -24,25 +24,37 @@ #:use-module (gnu packages bdw-gc) #:use-module (gnu packages perl) #:use-module (gnu packages help2man) - #:use-module (gnu packages ncurses)) + #:use-module (gnu packages ncurses) + #:use-module (gnu packages bash)) (define-public zile (package (name "zile") (version "2.4.9") - (source - (origin - (method url-fetch) - (uri (string-append "mirror://gnu/zile/zile-" - version ".tar.gz")) - (sha256 - (base32 - "0j801c28ypm924rw3lqyb6khxyslg6ycrv16wmmwcam0mk3mj6f7")))) + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnu/zile/zile-" + version ".tar.gz")) + (sha256 + (base32 + "0j801c28ypm924rw3lqyb6khxyslg6ycrv16wmmwcam0mk3mj6f7")))) (build-system gnu-build-system) + (arguments + '(#:phases (alist-cons-before + 'configure 'patch-/bin/sh + (lambda* (#:key inputs #:allow-other-keys) + (let ((bash (assoc-ref inputs "bash"))) + ;; Refer to the actual shell. + (substitute* '("lib/spawni.c" "src/funcs.c") + (("/bin/sh") + (string-append bash "/bin/sh"))))) + %standard-phases))) (inputs `(("boehm-gc" ,libgc) ("ncurses" ,ncurses) - ("perl" ,perl) + ("bash" ,bash))) + (native-inputs + `(("perl" ,perl) ("help2man" ,help2man))) (home-page "http://www.gnu.org/software/zile/") (synopsis "Zile is lossy Emacs, a lightweight Emacs clone") |