4 (luna-define-class test-wl-util (lunit-test-case))
6 (luna-define-method test-wl-parse-addresses-1 ((case test-wl-util))
9 '("foo@example.com" "bar@example.com")
10 (wl-parse-addresses "foo@example.com, bar@example.com"))))
14 (luna-define-method test-wl-unique-id ((case test-wl-util))
17 (string= (wl-unique-id)
18 (progn (sleep-for 1) (wl-unique-id))))))