New feature: toggle visibility of mime buttons.
[more-wl.git] / tests / test-utf7.el
blob1cab65686c109dd62a03906b807160ab9fc6290d
1 (require 'lunit)
2 (require 'utf7)
4 ;; Emacs 21.3.50 or later
5 (if (boundp 'utf-translate-cjk-mode)
6 (utf-translate-cjk-mode 1)
7 ;; Use Mule-UCS if installed
8 (ignore-errors (require 'un-define)))
10 (luna-define-class test-utf7 (lunit-test-case))
12 (luna-define-method test-utf7-encode-string ((case test-utf7))
13 (lunit-assert
14 (string=
15 "+ZeVnLIqe-"
16 (utf7-encode-string "\e$BF|K\8l\e(B")))) ; FIXME!!: don't care coding system
18 (luna-define-method test-utf7-decode-string ((case test-utf7))
19 (lunit-assert
20 (string=
21 "\e$BF|K\8l\e(B" ; FIXME!!: don't care coding system
22 (utf7-decode-string "+ZeVnLIqe-"))))