From 1b43e11132d3c9f58c3092a7296e11fcfb9a5f7e Mon Sep 17 00:00:00 2001 From: kaoru Date: Tue, 28 Aug 2001 15:37:06 +0000 Subject: [PATCH] * test-elmo-util.el: New file (test-elmo-replace-string-as-filename-1): New testcase. --- tests/ChangeLog | 3 +++ tests/test-elmo-util.el | 11 +++++++++++ 2 files changed, 14 insertions(+) create mode 100644 tests/test-elmo-util.el diff --git a/tests/ChangeLog b/tests/ChangeLog index 564e4af..a59d43f 100644 --- a/tests/ChangeLog +++ b/tests/ChangeLog @@ -1,5 +1,8 @@ 2001-08-28 TAKAHASHI Kaoru + * test-elmo-util.el: New file + (test-elmo-replace-string-as-filename-1): New testcase. + * test-dist.el: New file. (test-wl-modules-exists, test-elmo-modules-exists) (test-util-modules-exists, test-wl-icon-exists) diff --git a/tests/test-elmo-util.el b/tests/test-elmo-util.el new file mode 100644 index 0000000..96fe6fc --- /dev/null +++ b/tests/test-elmo-util.el @@ -0,0 +1,11 @@ +(require 'lunit) +(require 'elmo-util) + +(luna-define-class test-elmo-util (lunit-test-case)) + +(luna-define-method test-elmo-replace-string-as-filename-1 ((case test-elmo-util)) + (lunit-assert + (let ((str "/foo//./../bar/")) + (string= str + (elmo-recover-string-from-filename + (elmo-replace-string-as-filename str)))))) -- 1.7.10.4