summaryrefslogtreecommitdiff
path: root/gnu/packages/sqlite.scm
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2014-04-02 12:02:41 -0400
committerMark H Weaver <mhw@netris.org>2014-04-02 15:31:12 -0400
commit835281829a1044481067ffde590d20716c654d31 (patch)
tree1dc244b428b5518c0a43530803095a1659e43e83 /gnu/packages/sqlite.scm
parentfb9c3acc6c29b51cd531ea8884ad12ef33a4e734 (diff)
downloadpatches-835281829a1044481067ffde590d20716c654d31.tar
patches-835281829a1044481067ffde590d20716c654d31.tar.gz
gnu: sqlite: Compute source URL from version number.
* gnu/packages/sqlite.scm (sqlite): Compute the numeric-version from the traditional version string, and use it to compute the source URL.
Diffstat (limited to 'gnu/packages/sqlite.scm')
-rw-r--r--gnu/packages/sqlite.scm20
1 files changed, 16 insertions, 4 deletions
diff --git a/gnu/packages/sqlite.scm b/gnu/packages/sqlite.scm
index f688e137d5..2b767d78fc 100644
--- a/gnu/packages/sqlite.scm
+++ b/gnu/packages/sqlite.scm
@@ -1,5 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
+;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -21,7 +22,9 @@
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix build-system gnu)
- #:use-module (gnu packages))
+ #:use-module (gnu packages)
+ #:use-module (srfi srfi-26)
+ #:use-module (ice-9 match))
(define-public sqlite
(package
@@ -32,9 +35,18 @@
;; TODO: Download from sqlite.org once this bug :
;; http://lists.gnu.org/archive/html/bug-guile/2013-01/msg00027.html
;; has been fixed.
- (uri (string-append
- "mirror://sourceforge/sqlite.mirror/SQLite%20"
- version "/sqlite-autoconf-3080200.tar.gz"))
+ (uri (let ((numeric-version
+ (match (string-split version #\.)
+ ((first-digit other-digits ...)
+ (string-append first-digit
+ (string-pad-right
+ (string-concatenate
+ (map (cut string-pad <> 2 #\0)
+ other-digits))
+ 6 #\0))))))
+ (string-append
+ "mirror://sourceforge/sqlite.mirror/SQLite%20" version
+ "/sqlite-autoconf-" numeric-version ".tar.gz")))
(sha256
(base32
"14pg9zlwbwsj5w7f3qr25d3nniyv82gmczwlvpj0i0ic1431v1d0"))))