#### Edit Signatue in Admincenter HACK #### by C.v. Marle (C.A.vanMarle@inter.NL.net) # Some things may differ, because I've a very modified board... # Sorry... If you can't find any thing, please mail me... # BACK-UP all your files before editing!!! # Don't blame me if your board's messed up # Edit in [setmembers.cgi] >> after: $inmembercode = $query -> param('membercode'); >> add: $insignature = $query -> param('signature'); $inallowsig = $query -> param('allowsig'); >> change: print FILE "$membername|$innewpassword|$inmembertitle|$inmembercode|$innumberofposts|$inemailaddress|$showemail|$ipaddress|$inhomepage|$inaolname|$inicqnumber|$inlocation|$interests|$joineddate|$lastpostdate|$signature|$intimedifference|$allowedforums2|$useravatar|$misc1|$misc2|$misc3"; >> to: ## the change is here -->> -->> -->> -->> -->> -->> \/ and this -->> -->> \/ ## ($signature is changed to $insignature and $allowsig is added) print FILE "$membername|$innewpassword|$inmembertitle|$inmembercode|$innumberofposts|$inemailaddress|$showemail|$ipaddress|$inhomepage|$inaolname|$inicqnumber|$inlocation|$interests|$joineddate|$lastpostdate|$insignature|$intimedifference|$allowedforums2|$useravatar|$misc1|$misc2|$misc3|$allowsig"; >> after: Memberstate: $memberstateoutput >> add: Signature: ~; $tempoutput = "\n"; $tempoutput =~ s/value=\"$allowsig\"/value=\"$allowsig\" selected/; print qq~ Allow Changing: $tempoutput # you can change the values of cols and rows, ofcourse [ikon.lib] >> change: ($membername, $password, $membertitle, $membercode, $numberofposts, $emailaddress, $showemail, $ipaddress, $homepage, $aolname, $icqnumber ,$location ,$interests, $joineddate, $lastpostdate, $signature, $timedifference, $privateforums, $useravatar, $misc1, $misc2, $misc3) = split(/\|/,$filedata); >> to: ($membername, $password, $membertitle, $membercode, $numberofposts, $emailaddress, $showemail, $ipaddress, $homepage, $aolname, $icqnumber ,$location ,$interests, $joineddate, $lastpostdate, $signature, $timedifference, $privateforums, $useravatar, $misc1, $misc2, $misc3, $allowsig) = split(/\|/,$filedata); [post.cgi] >> change: (2x) print FILE "$inmembername|$password|$membertitle|$membercode|$numberofposts|$emailaddress|$showemail|$ipaddress|$homepage|$aolname|$icqnumber|$location|$interests|$joineddate|$lastpostdate|$signature|$timedifference|$privateforums|$useravatar|$misc1|$misc2|$misc3"; >> to: print FILE "$inmembername|$password|$membertitle|$membercode|$numberofposts|$emailaddress|$showemail|$ipaddress|$homepage|$aolname|$icqnumber|$location|$interests|$joineddate|$lastpostdate|$signature|$timedifference|$privateforums|$useravatar|$misc1|$misc2|$misc3|$allowsig"; [profile.cgi] >> change: print FILE "$inmembername|$newpassword|$membertitle|$membercode|$numberofposts|$newemailaddress|$newshowemail|$ipaddress|$newhomepage|$newaolname|$newicqnumber|$newlocation|$newinterests|$joineddate|$lastpostdate|$newsignature|$newtimedifference|$privateforums|$inuseravatar|$misc1|$misc2|$misc3"; >> to: if ($allowsig eq 'no') { $newsignature = $signature; } print FILE "$inmembername|$newpassword|$membertitle|$membercode|$numberofposts|$newemailaddress|$newshowemail|$ipaddress|$newhomepage|$newaolname|$newicqnumber|$newlocation|$newinterests|$joineddate|$lastpostdate|$newsignature|$newtimedifference|$privateforums|$inuseravatar|$misc1|$misc2|$misc3|$allowsig"; [register.cgi] >> change: print FILE "$inmembername|$password|$membertitle|$membercode|$numberofposts|$emailaddress|$showemail|$ipaddress|$homepage|$aolname|$icqnumber|$location|$interests|$joineddate|$lastpostdate|$signature|$timedifference|$privateforums|$useravatar|$misc1|$misc2|$misc3"; >> to: print FILE "$inmembername|$password|$membertitle|$membercode|$numberofposts|$emailaddress|$showemail|$ipaddress|$homepage|$aolname|$icqnumber|$location|$interests|$joineddate|$lastpostdate|$signature|$timedifference|$privateforums|$useravatar|$misc1|$misc2|$misc3|yes"; # I think that should do it... ;) # Mzzl, Chris # P.S. if you find any bugs/errors please send me an e-mail