X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/1bd8d71ce5bf9c67b3b1ac56b54306e9da65f9c1..7cf64f9b60a11b3908ec4fda5f33a45a98b08729:/emoji.plp

diff --git a/emoji.plp b/emoji.plp
index 176b339..73271d5 100644
--- 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";