[hide] tag mod 1.2 this mod allows users to hide parts of their posts with a [hide]...[/hide] tag. It will be replaced with [hidden] in the message list, in the quote and the summary below the quote. Other users must post a reply in the same thread to see the hidden text. Guest can never see the hidden text. Currently, there is no icon in the tag bar for that, so you have to inform your users about the feature yourself. Known bug: When you reply w/ quote to a post with a hidden text, the hidden text will appear as [hidden] in the quote, even when you can see any other hidden text. As always, backup your files and test it before you rely on it!! Comments to: c-a-e@gmx.net A UBBC tag is available as a seperate mod! 1.0: first release 1.1: bug fixed: Hidden text is shown on 'recent posts' page. Thanks gironimo! 1.2: bug fixed: Hidden text shows up for users replying on second+ page, too bug fixed: Hidden text is shown in "Recent posts" page of a user bug fixed: Hidden text is shown in search results cae mailto:c-a-e@gmx.net Sources/Post.pl if($quotemsg ne '') { ($msubject, $mname, $memail, $mdate, $musername, $micon, $mattach, $mip, $mmessage, $mns) = split(/\|/,$messages[$quotemsg]); $form_message=$mmessage; ### hide mod if( $form_message =~ /\[hide\]/) { $form_message =~ s/\[hide\](.+?)\[\/hide\]/\[HIDDEN]/g; } ### hide mod foreach (@censored) { ($tmpa,$tmpb) = @{$_}; $message =~ s~\Q$tmpa\E~$tmpb~gi; } ### hide mod if( $message =~ /\[hide\]/) { $message =~ s/\[hide\](.+?)\[\/hide\]/\[HIDDEN\]/g; } ### hide mod Sources/Recent.pl foreach (@censored) { ($tmpa,$tmpb) = @{$_}; $message =~ s~\Q$tmpa\E~$tmpb~gi; $msub =~ s~\Q$tmpa\E~$tmpb~gi; } ### hide mod if( $message =~ /\[hide\]/) { $message =~ s/\[hide\](.+?)\[\/hide\]/\[HIDDEN\]/g; } ### hide mod Sources/Display.pl $maxmessagedisplay ||= 10; ## hide mod my ($showhide,$tempdef); ## hide mod # Run UBBC interpreter on the message. $message = $postmessage; # put the message back into the proper variable to do ubbc on it ### hide mod if( $message =~ /\[hide\]/ && $showhide ne 'doit') { $message =~ s/\[hide\](.+?)\[\/hide\]/\[HIDDEN\]/g; } ### hide mod for( $counter = 0; $counter < $maxmessagedisplay && ( $buffer = ); $counter++ ) { $messages[$counter] = $buffer; } fclose(FILE); ### hide mod $showhide=''; fopen(FILE,"$datadir/$viewnum.txt") || &fatal_error("104 $txt{'106'}: $txt{'23'} $viewnum.txt"); @messages2 = ; fclose(FILE); foreach $tempdef (@messages2) { chomp($tempdef); ($msub, $mname, $memail, $mdate, $musername, $micon, $mattach, $mip, $postmessage, $ns, $mlm, $mlmb) = split(/[\|]/, $tempdef); if( $musername eq $username && $username ne 'Guest') { $showhide ='doit';} } ### hide mod Sources/Profile.pl if($enable_ubbc) { $ns = $mns; &DoUBBC; } $message =~ s/\[hide\](.+?)\[\/hide\]/\[HIDDEN\]/g; Sources/Search.pl if($enable_ubbc) { $ns = $mns; &DoUBBC; } $message =~ s/\[hide\](.+?)\[\/hide\]/\[HIDDEN\]/g;