[PATCH] gnu: Add tclxml.

[Jan Nieuwenhuizen <janneke@gnu.org>]

[-- Attachment #1: Type: text/plain, Size: 51 bytes --]

Hi,

Another tcl library package.

Greetings, Jan


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-gnu-Add-tclxml.patch --]
[-- Type: text/x-diff, Size: 3964 bytes --]

From 79f56d9c3f21e624ba9a3bfda00d2fc264796494 Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Tue, 9 Feb 2016 20:45:51 +0100
Subject: [PATCH] gnu: Add tclxml.

    * gnu/packages/tcl.scm (tclxml): New variable.
    * gnu/packages/patches/tclxml-3.2-install.patch: New file.
---
 gnu/packages/patches/tclxml-3.2-install.patch | 23 +++++++++++++
 gnu/packages/tcl.scm                          | 47 +++++++++++++++++++++++++--
 2 files changed, 68 insertions(+), 2 deletions(-)
 create mode 100644 gnu/packages/patches/tclxml-3.2-install.patch

diff --git a/gnu/packages/patches/tclxml-3.2-install.patch b/gnu/packages/patches/tclxml-3.2-install.patch
new file mode 100644
index 0000000..63542aa
--- /dev/null
+++ b/gnu/packages/patches/tclxml-3.2-install.patch
@@ -0,0 +1,23 @@
+--- ./Makefile.in~	2016-02-06 01:29:16.595090365 +0100
++++ ./Makefile.in	2016-02-06 09:29:04.286008931 +0100
+@@ -76,7 +76,7 @@
+ 
+ srcdir		= @srcdir@
+ prefix		= @prefix@
+-exec_prefix	= @exec_prefix@
++exec_prefix	= @prefix@
+ 
+ bindir		= @bindir@
+ libdir		= @libdir@
+@@ -133,9 +133,9 @@
+ # require for testing here (like TCLX_LIBRARY).
+ #========================================================================
+ 
+-EXTRA_PATH	= $(top_builddir):$(TCL_BIN_DIR)
++EXTRA_PATH	= $(top_builddir):$(TCL_BIN_DIR):$(libdir)
+ #EXTRA_PATH     = $(top_builddir):$(TCL_BIN_DIR):$(TK_BIN_DIR)
+-TCLLIBPATH      = $(top_builddir)
++TCLLIBPATH      = $(pkglibdir)
+ TCLSH_ENV	= TCL_LIBRARY=`@CYGPATH@ $(TCL_SRC_DIR)/library` \
+ 		  @LD_LIBRARY_PATH_VAR@="$(EXTRA_PATH):$(@LD_LIBRARY_PATH_VAR@)" \
+ 		  PATH="$(EXTRA_PATH):$(PATH)" \
diff --git a/gnu/packages/tcl.scm b/gnu/packages/tcl.scm
index 8d6059d..101b8f8 100644
--- a/gnu/packages/tcl.scm
+++ b/gnu/packages/tcl.scm
@@ -30,6 +30,7 @@
   #:use-module (gnu packages fontutils)
   #:use-module (gnu packages perl)
   #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg)
   #:use-module (guix licenses))
 
@@ -248,5 +249,47 @@ interfaces (GUIs) in the Tcl language.")
     (license (non-copyleft "http://www.tcl.tk/software/tcltk/license.html"
 			   "Tcl/Tk license"))))
 
-
-
+(define-public tclxml
+  (package
+    (name "tclxml")
+    (version "3.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://sourceforge/" name "/"
+                                  name "-" version ".tar.gz"))
+              (sha256
+               (base32
+                "0ffb4aw63inig3aql33g4pk0kjk14dv238anp1scwjdjh1k6n4gl"))
+	      (patches (list (search-patch (string-append (getenv "HOME") "/development.git/tclxml-3.2-install.patch"))))))
+    (build-system gnu-build-system)
+    (native-inputs
+     `(("tcl" ,tcl)
+       ("tcllib" ,tcllib)
+       ("libxml2" ,libxml2)
+       ("libxslt" ,libxslt)))
+   (native-search-paths
+    (list (search-path-specification
+           (variable "TCLLIBPATH")
+	   (separator " ")
+	   (files (list (string-append "lib/Tclxml" version))))))
+   (arguments
+    `(#:configure-flags
+      (list (string-append "--with-tclconfig="
+			   (assoc-ref %build-inputs "tcl")
+			   "/lib")
+	    (string-append "--with-xml2-config="
+			   (assoc-ref %build-inputs "libxml2")
+			   "/bin/xml2-config")
+	    (string-append "--with-xslt-config="
+			   (assoc-ref %build-inputs "libxslt")
+			   "/bin/xslt-config"))
+      #:phases (modify-phases %standard-phases
+                 (delete 'check))))
+    (home-page "http://tclxml.sourceforge.net/")
+    (synopsis " Tcl library for XML parsing")
+    (description " TclXML provides event-based parsing of XML documents.  The
+ application may register callback scripts for certain document
+ features, and when the parser encounters those features while parsing
+ the document the callback is evaluated.")
+    (license (non-copyleft "http://sourcesdev.debian.net/copyright/license/tclxml/3.2-1/"
+			   ""))))
-- 
2.1.4


[-- Attachment #3: Type: text/plain, Size: 154 bytes --]


-- 
Jan Nieuwenhuizen <janneke@gnu.org> | GNU LilyPond http://lilypond.org
Freelance IT http://JoyofSource.com | Avatar®  http://AvatarAcademy.nl