/Me Fix 1.02 Fixes SP1's /me function so that it will add the user's name and entire "/me blah blah" text in red. So, instead of: * is cooking up some slick stuff it would be: * Michael is cooking up some slick stuff More like IRC and makes more sense, right? v1.02: - Yes, I missed a few things. ;-) - Works in instant messages. - Works in recent posts display. - Works in user's recent posts display. - Works in "Print Page" display. v1.01: - Quote box fix: Now uses "* Me" instead of quoter's display name. - Reply fix: Now shows display names properly in topic summary screen. - Search fix: Now shows display names properly in search results. - Did I miss anything? =P v1.00: - Changes all /me lines to red text with the display name and the action. Try searching for: Is UBB Good? on any YaBB board. =D Michael http://www.themikecam.com Sources/Display.pl @userprofile = @{$userprofile{$musername}}; $displayname = $userprofile[1]; @userprofile = (); $displayname = $mname; Sources/YaBBC.pl $message =~ s~\/me\s(\S*)~* $1~g; $message =~ s~\[quote\s+author=(.*?)\s+link=(.*?)\].*\/me\s+(.*?)\[\/quote\]~\[quote author=$1 link=$2\]* $1 $3\[/quote\]~isg; $message =~ s~\[quote(.*?)\].*\/me\s+(.*?)\[\/quote\]~\[quote$1\]* Me $2\[/quote\]~isg; $message =~ s~\/me\s+(.*?)\n~* $displayname $1\n~isg; $message =~ s~\/me\s+(.*?)$~* $displayname $1\n~isg; Sources/Post.pl &wrap; $displayname = $tempname; Sources/Search.pl if( $tusername ne 'Guest' ) { $displayname = $mname; Sources/Recent.pl if( $tusername ne 'Guest' ) { $displayname = $mname; Sources/Profile.pl &wrap; $displayname = $mname; Sources/InstantMessage.pl @userprofile = @{$userprofile{$musername}}; $displayname = $userprofile[1]; if (!$useraccount{$musername}) {$usernamelink=qq~$musername~; $memberinfo ="$txt{'783'}";} if (!$useraccount{$musername}) {$usernamelink=qq~$musername~; $memberinfo ="$txt{'783'}"; $displayname = $musername;} Sources/Printpage.pl $threadpost =~ s~\[size=(.+?)\](.+?)\[/size\]~$2~isg; $threadpost =~ s~\[quote\s+author=(.*?)\s+link=(.*?)\].*\/me\s+(.*?)\[\/quote\]~\[quote author=$1 link=$2\]* $1 $3\[/quote\]~isg; $threadpost =~ s~\[quote(.*?)\].*\/me\s+(.*?)\[\/quote\]~\[quote$1\]* Me $2\[/quote\]~isg; $threadpost =~ s~\/me\s+(.*?)\n~* $threadposter $1\n~isg; $threadpost =~ s~\/me\s+(.*?)$~* $threadposter $1\n~isg;