sub gm_emoticons { &gm_readconfig; $_ = shift; if( (($emoticonsallowed eq "both") || ($emoticonsallowed eq $returnto)) && ($thisentryemoticonsallowed eq "yes") ) { s/\:smile://g; s/\:ohmy://g; s/\:sad://g; s/\:biggrin://g; s/\:tongue://g; s/\:wink://g; s/\:mad://g; s/\:blush://g; s/\:huh://g; s/\:cool://g; s/\:crazy://g; s/\:cry://g; s/\:sleeping://g; s/\:hehe://g; s/\:laugh://g; s/\:mellow://g; s/\:rolleyes://g; s/\:satisfied://g; s/\:alien://g; s/\:ermm://g; s/\:innocent://g; s/\:shifty://g; s/\:unsure://g; s/\:yawn://g; s/\:blink://g; s/\:fallen://g; s/\:kiss://g; s/\:showoff://g; s/\:urgent://g; s/\:boxing://g; s/\:flowers://g; s/\:music://g; s/\:sick://g; s/\:w00t://g; s/\:console://g; s/\:group://g; s/\:nuke://g; s/\:stubborn://g; s/\:wacko://g; s/\:devil://g; s/\:hammer://g; s/\:ph34r://g; s/\:sweating://g; s/\:whistling://g; s/\:dribble://g; s/\:happy://g; s/\:pinch://g; s/\:throb://g; s/\:worthy://g; s/\:dry://g; s/\:wub://g; s/\:hug://g; s/\:pooh://g; s/\:thumbsup://g; } return($_); } # merged in version 1.3 # ------------------ # emoticons code display subroutine # ------------------ # added by flipped cracker 9/17/2003 # version 1.3 sub gm_emoticons_code { &gm_readconfig; $emoticonsmaincode = ""; if( ($emoticonsallowed eq "both") || ($emoticonsallowed eq "entries") ) { $emoticonsmaincode = "
"; $emoticonsmorecode = "
"; } }