Re: [fricas-devel] [PATCH] fix an error in hyperdoc

2019-06-04 Thread Waldek Hebisch
oldk1331 wrote:
> 
> 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
> 

OK, please commit.

-- 
  Waldek Hebisch

-- 
You received this message because you are subscribed to the Google Groups 
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to fricas-devel+unsubscr...@googlegroups.com.
To post to this group, send email to fricas-devel@googlegroups.com.
To view this discussion on the web visit 
https://groups.google.com/d/msgid/fricas-devel/E1hYBq1-bS-Rk%40hera.math.uni.wroc.pl.
For more options, visit https://groups.google.com/d/optout.


[fricas-devel] [PATCH] fix an error in hyperdoc

2019-06-03 Thread 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

-- 
You received this message because you are subscribed to the Google Groups 
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to fricas-devel+unsubscr...@googlegroups.com.
To post to this group, send email to fricas-devel@googlegroups.com.
To view this discussion on the web visit 
https://groups.google.com/d/msgid/fricas-devel/CAGBJN93PaBpE%3DkhUibSJNur6zcOc6PgVQCEk%3DpoESS4_NL54HA%40mail.gmail.com.
For more options, visit https://groups.google.com/d/optout.