gemini: allow link text to have trailing whitespace.

diff --git a/extra/gemini/gemini.factor b/extra/gemini/gemini.factor
index f033f0f35eb18ea8ed3b10b12b7aa1a21052ec97..2d3a8b16ccfe85032dec8cfde763ff783b7a8372 100644 (file)
--- a/extra/gemini/gemini.factor
+++ b/extra/gemini/gemini.factor
@@ -143,7 +143,7 @@ DEFER: gemtext.
     link-text
     [ blank? ] trim-head
     [ blank? ] split1-when
-    [ blank? ] trim [ dup ] when-empty swap >url
+    [ blank? ] trim-head [ dup ] when-empty swap >url
     dup protocol>> [
         base-url clone f >>query f >>anchor swap derive-url
     ] unless ;