X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/c13fb4121ba63bf654fa7acbc63988864812303e..d12c1560f83f4bf9535ab45c412c1f6ad698b023:/index.plp

diff --git a/index.plp b/index.plp
index 0038d67..2b1d3e2 100644
--- a/index.plp
+++ b/index.plp
@@ -5,26 +5,6 @@ use warnings;
 no  warnings "qw";  # you know what you doing
 no  warnings "uninitialized";  # save some useless checks for more legible code
 
-# 2006-03-29 ~20:00 started work
-# 2006-03-30  11:58 html version
-# 2006-05-20  03:44 perl version
-# 2007-02-07  07:34 cleaned up
-# 2007-02-25  04:00 v1.0: git repository
-
-# TODO:
-# - use js to detect optimal key size
-# - style for .undo (maybe just some css3-only shadow)
-# - fix mode switching in konq (used to work)
-#   only when <wbr>s present?! use browser sniffing to force ?ascii=0 :(
-# - safari loading bug?
-# - good case for gzip compression
-# - link to source tarball
-# - default stylesheet selectable
-# - catch and execute pressed keys
-# - ghosting option documented and default
-# - option to follow aliases (default on?)
-# - custom row combinations (eg for comparing different modes)
-
 our $VERSION = "1.0";
 
 our $ascii = 0;
@@ -51,7 +31,7 @@ $header{content_type} = $ctype;
 <link rel="stylesheet" type="text/css" media="all" href="base.css">
 <!--[if lte IE 6]><style> .help dl.legend dt {margin:0 0 1px} </style><![endif]-->
 <!--[if lte IE 7]><style> .help dl.legend dd {float:none} </style><![endif]--><:
-	my %styles = map {$_ => $_} qw(dark circus mono);
+	my %styles = map {$_ => $_} qw(dark circus mono terse);
 	our $style = exists $get{style} && $styles{$get{style}} || "light";
 	printf(qq{\n<link rel="%s" type="text/css" media="all" href="%s" title="%s">},
 		$_ eq $style ? "stylesheet" : "alternate stylesheet", "$_.css", $_