aboutsummaryrefslogtreecommitdiff
path: root/src/interp/ht-root.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/ht-root.boot')
-rw-r--r--src/interp/ht-root.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/ht-root.boot b/src/interp/ht-root.boot
index 4933bcd8..024d78e5 100644
--- a/src/interp/ht-root.boot
+++ b/src/interp/ht-root.boot
@@ -191,7 +191,7 @@ gatherGlossLines(results,defstream) ==
(j := charPosition($tick,x,1)) and (nextPointer := SUBSTRING(x,0,j))
and (nextPointer = pointer) repeat
xtralines := [SUBSTRING(x,j + 1,nil),:xtralines]
- acc := [strconc(keyAndTick,def, "STRCONC"/nreverse xtralines),:acc]
+ acc := [strconc(keyAndTick,def, strconc/nreverse xtralines),:acc]
reverse acc
htGlossSearch(htPage,junk) == htGloss htpLabelInputString(htPage,'filter)