aboutsummaryrefslogtreecommitdiff
path: root/tests/test/xml-namespace.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/test/xml-namespace.scm')
-rw-r--r--tests/test/xml-namespace.scm36
1 files changed, 0 insertions, 36 deletions
diff --git a/tests/test/xml-namespace.scm b/tests/test/xml-namespace.scm
deleted file mode 100644
index 09402ceb..00000000
--- a/tests/test/xml-namespace.scm
+++ /dev/null
@@ -1,36 +0,0 @@
-(define-module (test xml-namespace)
- :use-module (srfi srfi-64)
- :use-module (srfi srfi-88)
- :use-module ((sxml namespace) :select (move-to-namespace)))
-
-(test-equal
- "Move unnamespaced to namespace"
- '(NEW:test)
- (move-to-namespace '(test) '((#f . NEW))))
-
-(test-equal
- "Swap namespaces"
- '(b:a (a:b))
- (move-to-namespace
- '(a:a (b:b))
- '((a . b) (b . a))))
-
-(test-equal
- "Remove all namespaces"
- '(a (b))
- (move-to-namespace '(a:a (b:b)) #f))
-
-(test-equal
- "Move everything to one namespace"
- '(c:a (c:b))
- (move-to-namespace '(a:a (b:b)) 'c))
-
-(test-equal
- "Partial namespace change"
- '(c:a (b:b))
- (move-to-namespace '(a:a (b:b)) '((a . c))))
-
-(test-equal
- "Remove specific namespace"
- '(a:a (b))
- (move-to-namespace '(a:a (b:b)) '((b . #f))))