EditorToolbar Button to mark slides for a new concept of a slideshow.

[Jan]

Heyho,
I made another attempt to create an EditorToolbar Button to mark slides
for a slideshow. (see "braintwister" some Mails down this list)
My Slideshow plugin is nearly ready and it will be quite beautifull. It
can be tested at slidesnstories.tiddlyspot.com. (The Demo
http://slidesnstories.tiddlyspot.com/#SliceShowDemo works but the text
is still a little chaotic...)
One thing I still need is a button to have a comfortable way to mark the
slides within the Tiddlers.
The structure for slides is defined by thomas slice macro and goes like
this:
<sli01> contentSlide1 </sli01> text in no slide <sli02> contentSlide2
</sli02> ....</sli10>

I now want a button to choose the numbers from 01 to 10 that are not
used yet.
Analog to $:/core/ui/EditorToolbar/link-dropdown I tried to use the
<linkcatcher> but I am totally lost...

-My first question is how can I make the filter
[all[current]!search:text[sli$(number)$]] refer to the Tiddler edited,
obviously the currentTiddler parameter does not follow the transclusion.
-Then I need to now the correct usage of the linkcatcher widget...
here's my attempt (and in the Text below):
http://slidesnstories.tiddlyspot.com/#%24%3A%2Fcore%2Fui%2FEditorToolbar%2Fslide-dropdown


Thanks a lot
Jan


\define freenumbers()
[all[current]!search:text[sli$(number)$]]
\end
\define slidelinks()
[[$(number)$]]
\end
\define freeslides()
<$list filter='01 02 03 04 05 06 07 08 09 10' variable="number">
<$list filter=<<freenumbers>>>
<<slidelinks>><br>
</$list>
</$list>
\end

\define pref() <sli$(slidenr)$>
\define suff() </sli$(slidenr)$>
\define setslide-actions()
<$button>
<$vars slidenr="""{{$:/Temp/Slidenumber}}""">
<$action-sendmessage
$message="tm-edit-text-operation"
$param="wrap-selection"
prefix=<<pret>>
suffix=<<suff>>
/>
\end

\define lingo-base() $:/language/Buttons/Slide/

\define body(config-title)
''<<lingo Hint>>''
\end

<$macrocall $name="body" config-title=<<qualify "$:/state/setslide/">>/>

<$linkcatcher actions=<<setslide-actions>> to=<<???>>>

<<freeslides>>

</$linkcatcher>

[Jan]

Hello,

I made another attempt to create an EditorToolbar Button to mark slides

for a slideshow. (see "braintwister" some Mails down this list.
The Problem is explained here

>
> My Slideshow plugin is nearly ready and it will be quite beautifull.
> It can be tested at slidesnstories.tiddlyspot.com. (The Demo
> http://slidesnstories.tiddlyspot.com/#SliceShowDemo works but the text
> is still a little chaotic...)
> One thing I still need is a button to have a comfortable way to mark
> the slides within the Tiddlers.
> The structure for slides is defined by thomas slice macro and goes
> like this:
> <sli01> contentSlide1 </sli01> text in no slide <sli02> contentSlide2
> </sli02> ....</sli10>
>
> I now want a button to choose the numbers from 01 to 10 that are not
> used yet.
> Analog to $:/core/ui/EditorToolbar/link-dropdown I tried to use the
> <linkcatcher> but I am totally lost...
>
> -My first question is how can I make the filter
> [all[current]!search:text[sli$(number)$]] refer to the Tiddler edited,
> obviously the currentTiddler parameter does not follow the transclusion.
> -Then I need to now the correct usage of the linkcatcher widget...
>
>

My Attempt is updated and I feel it is closer to what it should be, even
though now I get the embarassing red screen...
http://slidesnstories.tiddlyspot.com/#%24%3A%2Fcore%2Fui%2FEditorToolbar%2Fslide-dropdown

\define freenumbers()
[all[current]!search:text[sli$(number)$]]
\end
\define slidelinks()
[[$(number)$]]
\end
\define freeslides()
<$list filter='01 02 03 04 05 06 07 08 09 10' variable="number">
<$list filter=<<freenumbers>>>
<<slidelinks>>

</$list>
</$list>
\end

\define pref() <sli$(slidenr)$>
\define suff() </sli$(slidenr)$>
\define setslide-actions()

<$vars slidenr="""{{$:/Temp/slidenumber}}""">

<$action-sendmessage
$message="tm-edit-text-operation"
$param="wrap-selection"

prefix=<sli$(slidenr)$>
suffix=</sli$(slidenr)$>
/>
</$vars>
<$action-deletetiddler
$tiddler=<<dropdown-state>>

/>
\end

\define lingo-base() $:/language/Buttons/Slide/

\define body(config-title)
''<<lingo Hint>>''
\end

<$macrocall $name="body" config-title=<<qualify "$:/state/setslide/">>/>

<$linkcatcher actions=<<setslide-actions>> to="$:/Temp/slidenumber">

<<freeslides>>

</$linkcatcher>

Thanks for help
Jan