]> gitweb.factorcode.org Git - factor.git/commitdiff
gemini: wrap at 76 chars.
authorJohn Benediktsson <mrjbq7@gmail.com>
Mon, 15 Mar 2021 19:25:35 +0000 (12:25 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Mon, 15 Mar 2021 19:25:35 +0000 (12:25 -0700)
extra/gemini/gemini.factor

index 62e7eaa23d0ede56428a1ffee471115f32fdde1d..f033f0f35eb18ea8ed3b10b12b7aa1a21052ec97 100644 (file)
@@ -163,10 +163,10 @@ DEFER: gemtext.
     ] while drop ;
 
 : gemini-quoted. ( text -- )
-    76 gemini-pad 76 wrap-lines [ "> " write print ] each ;
+    74 gemini-pad 74 wrap-lines [ "> " write print ] each ;
 
 : gemini-text. ( text -- )
-    78 gemini-pad 78 wrap-string print ;
+    76 gemini-pad 76 wrap-string print ;
 
 SYMBOL: pre