* test-utf7.el (toplevel): Use `fboundp' instead of `boundp'.
[elisp/wanderlust.git] / tests / test-utf7.el
index 1cab656..8ccd392 100644 (file)
@@ -1,11 +1,14 @@
+;; -*- coding: iso-2022-jp -*-
 (require 'lunit)
-(require 'utf7)
 
-;; Emacs 21.3.50 or later
-(if (boundp 'utf-translate-cjk-mode)
-    (utf-translate-cjk-mode 1)
-  ;; Use Mule-UCS if installed
+;; Emacs 21
+(unless (and (fboundp 'find-coding-system) (find-coding-system 'utf-16))
   (ignore-errors (require 'un-define)))
+(require 'utf7)
+
+;; Emacs 21.3.50 to 22
+(when (fboundp 'utf-translate-cjk-mode)
+  (utf-translate-cjk-mode 1))
 
 (luna-define-class test-utf7 (lunit-test-case))