X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=tests%2Fcheck-base64.el;h=57cefd5609a21b3dbf437b0de62342d48d44ace7;hb=2014153ddfe1ef56de8332f048749281d7218b7c;hp=c21707b7f7f32245626a8b9774ae590e56d7b3b0;hpb=ad64c20d9382dc25ba918e5e5a3f7d8c1ae48c56;p=elisp%2Fwanderlust.git diff --git a/tests/check-base64.el b/tests/check-base64.el index c21707b..57cefd5 100644 --- a/tests/check-base64.el +++ b/tests/check-base64.el @@ -4,21 +4,21 @@ ;; mel-b-ccl on XEmacs 21.1 ;; -(luna-define-method check-base64-encode-1 ((case check-base64)) +(luna-define-method test-base64-encode-1 ((case check-base64)) (require 'elmo-util) (lunit-assert (string= "QQ==" (elmo-base64-encode-string "A")))) -(luna-define-method check-base64-encode-2 ((case check-base64)) +(luna-define-method test-base64-encode-2 ((case check-base64)) (require 'elmo-util) (lunit-assert (string= "QUE=" (elmo-base64-encode-string "AA")))) -(luna-define-method check-base64-encode-3 ((case check-base64)) +(luna-define-method test-base64-encode-3 ((case check-base64)) (require 'elmo-util) (lunit-assert (string= @@ -33,7 +33,7 @@ (elmo-base64-encode-string "" t) (wrong-number-of-arguments))) -(luna-define-method check-base64-encode-4 ((case check-base64)) +(luna-define-method test-base64-encode-4 ((case check-base64)) (lunit-assert (check-base64-encode-string-has-no-line-break-argument))) @@ -48,7 +48,6 @@ t) (wrong-number-of-arguments))) -(luna-define-method check-base64-encode-5 ((case check-base64)) +(luna-define-method test-base64-encode-5 ((case check-base64)) (lunit-assert (check-base64-encode-region-has-no-line-break-argument))) -