Question

• TWiki version: Feb 2003
• Perl version: NA
• Web server & version: NA
• Server OS: NA
• Web browser & version: NA
• Client OS: NA

Hi all,

I would like to automatically display all the webs with a user definable name (ie not the normal web name).

I tried to do this using a mixture of VAR and WEBLIST like this :

%WEBLIST{"   * [[$name.WebHome][ $qname - %VAR{"WEBDISPLAYNAME", web=$qname}%]]"}% 

But this gives the results below (I"ve replaced WEBDISPALYNAME with WEBBGCOLOR as that's defined here.

• "Blog" - #B9DAFF
• "Codev" - #B9DAFF
• "Main" - #B9DAFF
• "Plugins" - #B9DAFF
• "Sandbox" - #B9DAFF
• "Support" - #B9DAFF
• "TWiki" - #B9DAFF
• "TWiki01" - #B9DAFF
• "TWiki02" - #B9DAFF
• "TWiki03" - #B9DAFF
• "TWiki04" - #B9DAFF
• "TWiki04x01" - #B9DAFF
• "TWiki04x02" - #B9DAFF
• "TWiki04x03" - #B9DAFF
• "TWiki05x00" - #B9DAFF
• "TWiki05x01" - #B9DAFF
• "TWiki06x00" - #B9DAFF
• "TWiki06x01" - #B9DAFF
• "WikiWed" - #B9DAFF

It looks lke the VAR is being evaluated before qname.

Any other ideas?

-- MartinFuzzey - 04 Apr 2003

Answer

You can use a FormattedSearch with a pattern instead. Write this:

%SEARCH{ "^WebPreferences$" regex="on" scope="topic" web="all" nototal="on" nosearch="on" format="   * [[$web.WebHome][$web - $pattern(.*?\* Set WEBBGCOLOR\s*=\s*([^\s]*).*)]]" }%

To get this:

• Blog - #D0D0D0
• Codev - #F9D1C9
• Main - #FFEFA6
• Plugins - #E3E9A5
• Sandbox - #E0E3E7
• Support - #B9DAFF
• TWiki - #FFD8AA
• TWiki01 - #FFE0B0
• TWiki02 - #FFE0B0
• TWiki03 - #FFD8AA
• TWiki04 - #FFD8AA
• TWiki04x01 - #FFD8AA
• TWiki04x02 - #FFD8AA
• TWiki04x03 - #FFD8AA
• TWiki05x00 - #FFD8AA
• TWiki05x01 - #FFD8AA
• TWiki06x00 - #FFD8AA
• TWiki06x01 - #FFD8AA
• WikiWed - #9dea95

-- PeterThoeny - 06 Apr 2003