From: Mischa POSLAWSKY <perl@shiar.org>
Date: Tue, 13 Jul 2010 20:58:16 +0000 (+0200)
Subject: emoji: list systems by section divs
X-Git-Tag: v1.4~125
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/90f76caa2008d1a07484ee43f141718fdadbf1a7?hp=f16c93d413b32cb2b7c44d1255e4533fcbcf1bcc

emoji: list systems by section divs
---

diff --git a/base.css b/base.css
index 41742e3..70a4429 100644
--- a/base.css
+++ b/base.css
@@ -48,6 +48,9 @@ hr {
 	position: relative; /* prevents buggy hovering in table if caption present in gecko */
 	margin: 1ex 1ex 2ex;
 }
+.section .section {
+	float: left;
+}
 #charset .section table {
 	margin: -0.5ex 0 1ex; /* headers provide sufficient spacing already */
 }
diff --git a/emoji.plp b/emoji.plp
index 60aaf0d..68c1ec2 100644
--- a/emoji.plp
+++ b/emoji.plp
@@ -18,7 +18,7 @@ Html({
 <h1>IM emoticons</h1>
 
 <:
-print "<ul>\n";
+print '<div class="section">'."\n";
 
 for my $system (qw'gmail msn yahoo') {
 	my @info = do "emoji-$system.inc.pl";
@@ -27,7 +27,7 @@ for my $system (qw'gmail msn yahoo') {
 	my $title = $meta->{name} // $system;
 	$title = qq{<a href="$_">$title</a>} for $meta->{source} || ();
 
-	printf '<div class="section"><h3>%s</h3>'."\n\n", $meta->{name} // $system;
+	printf '<div class="section"><h2>%s</h2>'."\n\n", $meta->{name} // $system;
 	print '<table><tbody>'."\n";
 	for (my $i = 0; $i <= $#info; $i++) {
 		my $name = $info[$i];
@@ -46,5 +46,5 @@ for my $system (qw'gmail msn yahoo') {
 	print "</table></div>\n\n";
 }
 
-print "</ul><hr>\n\n";
+print "</div><hr>\n\n";