PS
or better a check like this, then if the §{content} does not start with
<iframe, it is simply printed as text:

  ("§"  #
iframe


         (let Lnk (till "}" T)


              (if (= "<iframe" (pack (car (split (chop Lnk) " "))))

                (prin
Lnk)
                (ht:Prin Lnk) ) ) )

Cheers
Thorsten

Am Di., 11. Okt. 2022 um 22:46 Uhr schrieb Thorsten Jolitz <
tjol...@gmail.com>:

> Hi Alex,
> it's actually extremely easy to embed content in a picolisp wiki file,
> when adding the syntax element from the PS 1 to wiki/lib.l :
> §{ <iframe width= ....></iframe>}
> I added a little check for <iframe before the prin, so that the wiki
> syntax user cannot insert any kind of code.
>
> With this element its easy to embed youtube videos in wiki pages, they all
> have an embed link (see PS 2)
>
> Would you consider to add something like this in wiki/lib.l ?
> Cheers
> Thorsten
>
>
>
> PS 1
> ########
>
> 1 file changed, 5 insertions(+), 1 deletion(-)
>
>
> lib.l | 6
>
> +++++-
>
>
> modified   lib.l
>
>
> @@ -54,7 +54,7 @@
>
>
> (recur (Nest)
>
>
> (use C
>
>
> (loop
>
>
>    -               (ht:Prin (till "^J123456&/!_*+-%~|<@>=\^:$\\#}" T))
>
>
> +               (ht:Prin (till "^J123456&/!_*+-%~|<@>=\^:$\\#§}" T))
>
>
> (NIL (setq C (char)))
>
>
> (T (and Nest (= C "}")))
>
>
> (unless (= C "\\")
>
>
> @@ -159,6 +159,10 @@
>
>
> (renderBlock ht:Prin)) )
>
>
> ("\\" (prin "{"))  # Escaped brace
>
>
> ("#" (renderBlock prog))  # Comment
>
>
> +                           ("§"  # iframe
>
>
> +                              (let Lnk (till "}" T)
>
>
> +                                   (when (= "<iframe" (pack (car (split
> (chop Lnk) " ")))))
>
> +                                     (prin Lnk) ) )
>
>
> (T (prin C "{")) ) )
>
>
> (T (ht:Prin C)) ) ) ) ) ) ) )
> ########
>
> PS 2
> <iframe width="560" height="315" src="
> https://www.youtube.com/embed/k7CHDscLREk"; title="YouTube video player"
> frameborder="0" allow="accelerometer; autoplay; clipboard-write;
> encrypted-media; gyroscope; picture-in-picture" allowfullscreen></iframe>
>
>
> Am So., 17. Juli 2022 um 15:46 Uhr schrieb Alexander Burger <
> a...@software-lab.de>:
>
>> Hi Thorsten,
>>
>> > is there a way to embed content in a PicoLisp Wiki file?
>> > ...
>> > But when sharing e.g. a youtube video, there is the "embed" option, that
>> > gives this iframe:
>> > <iframe width="560" height="315" src="
>> > https://www.youtube.com/embed/xEKHU4zCRpY"; title="YouTube video player"
>> > ...
>> > I could not figure out how to include this in a page with the PicoLisp
>> Wiki
>> > Syntax - probably it's not possible?
>>
>> I'm afraid so. I think there is no syntax for that in the markup
>> language. Maybe
>> Erik has an idea?
>>
>> ☺/ A!ex
>>
>> --
>> UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe
>>
>

Reply via email to