\define addPrefix() [addprefix[$:/state/Bob/$(WikiName)$/]]
\define getTitle() $:/state/Bob/$(WikiName)$/$:/SiteTitle
\define getSubtitle() $:/state/Bob/$(WikiName)$/$:/SiteSubtitle
Available Wikis: <$button>
Refresh Titles
<$list filter="[[$:/WikiSettings/split/wikis]indexes[]]" variable="WikiName">
<$action-websocketmessage
$type='internalFetch'
fromWiki=<<WikiName>>
filter='[title[$:/SiteTitle]]'
transformFilter=<<addPrefix>>
resolution='force'
/>
<$action-websocketmessage
$type='internalFetch'
fromWiki=<<WikiName>>
filter='[title[$:/SiteSubtitle]]'
transformFilter=<<addPrefix>>
resolution='force'
/>
</$list>
</$button>
<$list filter="[[$:/WikiSettings/split/wikis]indexes[]]" variable="WikiName">
<li>
<a href=<<WikiName>> target='_blank'>
<$transclude tiddler=<<getTitle>> ><$text text=<<WikiName>> /></$transclude></a> <$transclude tiddler=<<getSubtitle>> />
</li>
</$list>