Three shortcuts that do not work

#1

hello
in my-init-texmacs i have written this and none of 3 do work
could you help me find why ?

i mean the first two dont create errors but just dont work

;liens
(kbd-map (:mode in-text?) ("l l l"
(small (slink ""))
))

;plie
(kbd-map (:mode in-text?) ("p p p"
(folded (document (concat (small (slink "")) "réponses (cliquer sur " (math "<circ>") ")")) (document ""))
))

; division euclidienne
(kbd-map (:mode in-math?) ("d d d" (insert'
(math (tabular* (tformat (cwith "2" "2" "6" "6" "cell-bborder" "0ln") (cwith "3" "3" "6" "6" "cell-tborder" "0ln") (cwith "5" "5" "6" "6" "cell-bborder" "0ln") (cwith "1" "-1" "6" "6" "cell-lborder" "0.15ln") (cwith "1" "-1" "5" "5" "cell-rborder" "0.15ln") (cwith "1" "-1" "6" "6" "cell-rborder" "0ln") (cwith "1" "1" "6" "6" "cell-tborder" "0ln") (cwith "1" "1" "6" "6" "cell-bborder" "0.15ln") (cwith "2" "2" "6" "6" "cell-tborder" "0.15ln") (cwith "1" "1" "6" "6" "cell-lborder" "0.15ln") (cwith "1" "1" "5" "5" "cell-rborder" "0.15ln") (cwith "1" "1" "6" "6" "cell-rborder" "0ln") (table (row (cell "") (cell "9") (cell "8") (cell "1") (cell "") (cell "7")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell ""))))))
)))
#2

For the first one, this is the correct key binding:

(kbd-map (:mode in-text?) ("l l l" (insert '(small (slink "")) )))

And you have to move backward twice manually. You just forgot to use insert.

Here is a better key binding for u:

(kbd-map (:mode in-text?) ("l l l" 
                           (begin
                             (insert '(small (slink "")))
                             (go-to-previous)
                             (go-to-previous))))

In the above code snippet, I added two (go-to-previous) to move backward automatically for you.

#3

For the third one, you should remove (math ) and replace insert with math-insert. Here is a working example:

(kbd-map (:mode in-math?) ("d d d" (math-insert '
(tabular* (tformat (cwith "2" "2" "6" "6" "cell-bborder" "0ln") (cwith "3" "3" "6" "6" "cell-tborder" "0ln") (cwith "5" "5" "6" "6" "cell-bborder" "0ln") (cwith "1" "-1" "6" "6" "cell-lborder" "0.15ln") (cwith "1" "-1" "5" "5" "cell-rborder" "0.15ln") (cwith "1" "-1" "6" "6" "cell-rborder" "0ln") (cwith "1" "1" "6" "6" "cell-tborder" "0ln") (cwith "1" "1" "6" "6" "cell-bborder" "0.15ln") (cwith "2" "2" "6" "6" "cell-tborder" "0.15ln") (cwith "1" "1" "6" "6" "cell-lborder" "0.15ln") (cwith "1" "1" "5" "5" "cell-rborder" "0.15ln") (cwith "1" "1" "6" "6" "cell-rborder" "0ln") (table (row (cell "") (cell "9") (cell "8") (cell "1") (cell "") (cell "7")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell "") (cell "") (cell "")))))
)))
#4

For the second one, you forgot to use insert. Here is a working example:

(kbd-map (:mode in-text?) ("p p p"
(insert '(folded (document (concat (small (slink "")) "réponses (cliquer sur " (math "<circ>") ")")) (document ""))
)))
#5

thanks very very much Darcy
it works very fine
i feel i can not at this moment undestrand by myself when i need (begin or not, (math or not, (math-insert or not
what i only know how to do it copying any math object and export it to texmacs-scheme

i can share my shortcut on my website maybe, i have a very very convenient TeXmacs nows

vinz