emoji: mark yahoo additions in version 6

[sheet.git] / emoji.plp

diff --git a/emoji.plp b/emoji.plp
index 176b339d1c9594b733ae043047c04b7f47070dd8..73271d5892b77084508551966557a008e2d09102 100644 (file)
--- a/emoji.plp
+++ b/emoji.plp
@@ -4,12 +4,14 @@ Html({
        title => 'emoji cheat sheet',
        version => 'v1.0',
        description => [
-               "MSN emoticons",
+               "Emoticons overview and Unicode equivalents"
+               . " of MSN, Y!M, and Gmail icons.",
        ],
        keywords => [qw'
-               sheet cheat emoticon smiley emoji msn
+               sheet cheat emoticon smiley emoji unicode
+               chat im messenger msn yahoo ym gmail google
        '],
-       stylesheet => [qw'light dark red'],
+       stylesheet => [qw'light'],
 });
 
 :>
@@ -18,13 +20,15 @@ Html({
 <:
 my %ICONURL = (
        msn   => 'http://messenger.msn.com/Resource/emoticons/%s.gif',
+#      yahoo => 'http://l.yimg.com/us.yimg.com/i/mesg/emoticons6/%s.gif',
        yahoo => 'http://l.yimg.com/us.yimg.com/i/mesg/emoticons7/%s.gif',
 #      yahoo-web => 'http://l.yimg.com/a/i/us/msg/emoticons/%s.gif',
+       gmail => 'http://mail.google.com/mail/help/images/screenshots/chat/%s.gif',
 );
 
 print "<ul>\n";
 
-for my $system (qw'msn yahoo') {
+for my $system (qw'gmail msn yahoo') {
        my @info = do "emoji-$system.inc.pl";
        printf '<div class="section"><h3>%s</h3>'."\n\n", $system;
        print '<table><tbody>'."\n";