Name:
Message:
	(Wikisyntax is on!)

"); SDV($GuestbookTagFmt,"

Name::
Homepage?:
Message:
	(Wikisyntax is on!)

"); # SDV($InlineReplacements['/\\[\\[\\$Guestbook\\]\\]/e'], # "FmtPageName(\$GLOBALS['GuestbookTagFmt'],\$pagename)"); #http://www.blug.ch/wiki?message=Formulareingabe+%FCber+G%E4stebuch # &action=guestbook&name=Webmaster&homepage= function HandleGuestbook($pagename){ /* ($pagename) */ # global $homepage,$pagename; TestLog("gb-REQUEST_URI-{$_SERVER['REQUEST_URI']} ") ; TestLog("gb-pagename-$pagename"); # echo "homepage =".$homepage.$HTTP_GET_VARS["homepage"] ; global $TimeFmt,$Now,$_GET; $default = "----"; $rcpage = ReadPage($pagename,""); $pos=strpos($rcpage['text'],"(:\$Guestbook:)"); $len=strlen("(:\$Guestbook:)"); $before=substr($rcpage['text'],0,$pos+$len); $after=substr($rcpage['text'],$pos+$len); $rcpage['text'] = $before. /* "\n$$$$\$default". pog? */ "\n\n%green%''".strftime($TimeFmt,$Now). " by ''".StripCSlashes($_GET["name"])."%%[[<<]]". (($_GET["homepage"])?StripCSlashes($_GET["homepage"]):"")."[[<<]]\n".StripCSlashes($_GET['message']). "[[<<]]----".$homepage. "/". $HTTP_GET_VARS["homepage"]. $after; WritePage($pagename,$rcpage); Redirect($pagename); } Markup('{$Guestbook}', '>{$var}','/\\(:\\$Guestbook:\\)/',Keep($GuestbookTagFmt)); #Markup('Guestbook', 'directives', '/\\(:$Guestbook:\\)/e',"Guestbook()"); ?>