tests/test-elmo-util.el

   1 (require 'lunit)
   2 (require 'elmo-util)
   3
   4 (luna-define-class test-elmo-util (lunit-test-case))
   5
   6 (luna-define-method test-elmo-replace-string-as-filename-1 ((case test-elmo-util))
   7   (lunit-assert
   8    (let ((str "/foo//./../bar/"))
   9      (string= str
  10               (elmo-recover-string-from-filename
  11                (elmo-replace-string-as-filename str))))))