[PATCH] fix an error in hyperdoc

[oldk1331]

When you set ")set hyperdoc fullscreen on", then in hyperdoc,
click "Settings -> Settings", you will see the error page,
and in terminal:

(1) ->
   >> System error:
   invalid number of arguments: 3

By backtrace , it happens in "htSystemVariables":

    (|htSay| "{\\em " |break| "}\\space{1}")

Clearly it should be "htSayList".

diff --git a/src/interp/ht-root.boot b/src/interp/ht-root.boot
index 44339a4b..8b70a42b 100644
--- a/src/interp/ht-root.boot
+++ b/src/interp/ht-root.boot
@@ -89,10 +89,10 @@
       htMakePage '((domainConditions (isDomain INT (Integer))))
       htMakePage  [['bcStrings,[5,STRINGIMAGE val,name,'INT]]]
     class = 'STRING =>
-      htSay('"{\em ",val,'"}\space{1}")
+      htSayList ['"{\em ", val, '"}\space{1}"]
     for x in options repeat
       val = x or val = true and x = 'on or null val and x = 'off =>
-        htSay('"{\em ",x,'"}\space{1}")
+        htSayList ['"{\em ", x, '"}\space{1}"]
       htMakePage [['bcLispLinks,[x,'"
",'htSetSystemVariable,[variable,x]]]]
   fn(t,al,firstTime) ==
     atom t => al

[Waldek Hebisch]

OK, please commit.

--
Waldek Hebisch