diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt
index 3d6561dcbe..1e2299056e 100644
--- a/TODO.FACTOR.txt
+++ b/TODO.FACTOR.txt
@@ -11,6 +11,7 @@
 - better help result ranking
 - minibuffer should show a title
 - clean up listener's minibuffer-related code
+- help search looks funny
 
 + ui:
 
diff --git a/library/ui/tools/search.factor b/library/ui/tools/search.factor
index 5a8bd284ac..1b69e441f9 100644
--- a/library/ui/tools/search.factor
+++ b/library/ui/tools/search.factor
@@ -68,7 +68,7 @@ M: live-search focusable-child* live-search-field ;
 : <help-search> ( string action -- gadget )
     \ first add*
     [ search-help ]
-    [ [ second ($link) ] make-pane ]
+    [ [ first ($link) ] make-pane ]
     <live-search> ;
 
 : file-completion. ( pair -- )