my($self,$main,$text) = @_;
        
        return if $main->{current_user}{nosmileys};
        
        if (!exists($self->{smileys}))
        {
                $self->{smileys} = {};
                foreach my $smiley (@{$main->{settings}{smileys}})
                {
                        $smiley = $smiley;
                        my $image = undef;
                        foreach (@$smiley)
                        {
                                if (!defined($image))
                                {
                                        $image = $_;
                
                                        my ($width,$height);
                                        ($width,$height) = @{$main->{settings}{images}{$image}} if defined($main->{settings}{images}{$image});
                                        $width = (defined($width) ? " width=$width": "");
                                        $height = (defined($height) ? " height=$height": "");
                
                                        my $alt = $main->toHTML($smiley->[1]);
                                        $image = "<img src=\"$main->{settings}{urls}{imagesurl}$image.gif\" border=0$width$height alt=\"$alt\">";
                                }
                                elsif ($_ ne '/hidden/')
                                {
                                        $self->{smileys}{$main->toHTML($_)} = $image;
                                }
                        }
                }
        }