head 1.2; access; symbols; locks; strict; comment @# @; 1.2 date 2007.01.16.04.11.56; author TWikiContributor; state Exp; branches; next 1.1; 1.1 date 2006.02.01.12.01.24; author TWikiContributor; state Exp; branches; next ; desc @new-topic @ 1.2 log @buildrelease @ text @%META:TOPICINFO{author="TWikiContributor" date="1167969723" format="1.0" version="2"}% %META:TOPICPARENT{name="TWikiTipsOfTheDayAdmin"}% ---+ TWiki Tips Of the Day Include This Page randomly picks a Tip of the day to display. The %HOMETOPIC% includes the part between the horizontal rules. ----- %STARTINCLUDE%
%ICON{tip}% TWiki Tip of the Day
%CALC{$SET(webtopic, $LISTRAND(%SEARCH{ "^TWiki[Custom]*Tip[0-9A-Z]" web="%TWIKIWEB%, %MAINWEB%" topic="TWiki*Tip*" scope="topic" type="regex" casesensitive="on" nosearch="on" nototal="on" separator=", " format="$web.$topic" noheader="on" }%))$SET(pos, $FIND(., $GET(webtopic)))$SET(web, $REPLACE($GET(webtopic), $GET(pos), 100))$SET(topic, $REPLACE($GET(webtopic), 1, $GET(pos)))}% %CALC{$NOP(%)SEARCH{ \"^$GET(topic)$\" web=\"$GET(web)\" scope="topic" regex="on" nosearch=\"on\" noheader=\"on\" nototal=\"on\" limit=\"1\" format=\"[[%SCRIPTURL{view}%/$web/$topic][$pattern(.*?\-\-\-\+([^\n\r]+).*)]]
$summary(100, noheader) [[%SCRIPTURL{view}%/$web/$topic][%MAKETEXT{"Read on"}% \\"Read]]\"}$NOP(%)}%
%STOPINCLUDE% ----- __See also:__ TWikiTipsOfTheDay, TWikiTipsOfTheDayAdmin @ 1.1 log @buildrelease @ text @d1 1 a1 1 %META:TOPICINFO{author="TWikiContributor" date="1121985706" format="1.0" version="1"}% a8 10 d11 2 a12 2
%CALC{$NOP(%)SEARCH{ \"^$GET(topic)$\" web=\"$GET(web)\" scope="topic" regex="on" nosearch=\"on\" noheader=\"on\" nototal=\"on\" limit=\"1\" format=\"[[%SCRIPTURL%/view%SCRIPTSUFFIX%/$web/$topic][$pattern(.*?\-\-\-\+([^\n\r]+).*)]]
$summary(100, noheader) [[%SCRIPTURL%/view%SCRIPTSUFFIX%/$web/$topic][%MAKETEXT{"Read on"}% \\"Read]]\"}$NOP(%)}% a19 1 @