fix some help-lint errors.

[factor.git] / basis / io / encodings / utf7 / utf7.factor

diff --git a/basis/io/encodings/utf7/utf7.factor b/basis/io/encodings/utf7/utf7.factor
index 821ce1fb229ee47dc939a2ca35ba6ac7a958bc6d..40d4fe5490834ca7fe3e726d15652db153c0b427 100644 (file)
--- a/basis/io/encodings/utf7/utf7.factor
+++ b/basis/io/encodings/utf7/utf7.factor
@@ -10,13 +10,13 @@ TUPLE: utf7codec dialect buffer ;
 ! These words encodes the difference between standard utf7 and the
 ! dialect used by IMAP which wants slashes replaced with commas when
 ! encoding and uses '&' instead of '+' as the escaping character.
-: utf7 ( -- t )
+: utf7 ( -- utf7codec )
     {
         { { } { } }
         { { CHAR: + } { CHAR: - } }
     } V{ } utf7codec boa ;
 
-: utf7imap4 ( -- t )
+: utf7imap4 ( -- utf7codec )
     {
         { { CHAR: / } { CHAR: , } }
         { { CHAR: & } { CHAR: - } }