Update copyright year.

[elisp/riece.git] / lisp / test / test-riece-url.el

diff --git a/lisp/test/test-riece-url.el b/lisp/test/test-riece-url.el
index a76a2e8..d5defe3 100644 (file)
--- a/lisp/test/test-riece-url.el
+++ b/lisp/test/test-riece-url.el
@@ -7,19 +7,23 @@
     (insert "111\n222\n333\n")
     (goto-char (point-min))
     (re-search-forward "2\\(2\\)2")
-    (lunit-assert
+    (lunit-assert-2
+     case
      (equal (save-match-data
              (riece-url-replace-match "\\&"))
            "222"))
-    (lunit-assert
+    (lunit-assert-2
+     case
      (equal (save-match-data
              (riece-url-replace-match "\\0"))
            "\\0"))
-    (lunit-assert
+    (lunit-assert-2
+     case
      (equal (save-match-data
              (riece-url-replace-match "\\1"))
            "2"))
-    (lunit-assert
+    (lunit-assert-2
+     case
      (equal (save-match-data
              (riece-url-replace-match "\\\\"))
            "\\"))))
@@ -33,5 +37,6 @@
          riece-urls
          riece-addons)
       (riece-url-scan-region (point-min) (point-max))
-      (lunit-assert
+      (lunit-assert-2
+       case
        (member "http://bugs.debian.org/12345" riece-urls)))))