From 7960a4d2d0e86f612653562d6095a5b206c0e8ec Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Cl=C3=A9ment=20Oudot?= <clement@oodo.net>
Date: Thu, 11 Mar 2010 15:42:16 +0000
Subject: [PATCH] Test: little improvements on test page

---
 build/lemonldap-ng/_example/test/index.pl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/build/lemonldap-ng/_example/test/index.pl b/build/lemonldap-ng/_example/test/index.pl
index f96ed760e..5772707a5 100755
--- a/build/lemonldap-ng/_example/test/index.pl
+++ b/build/lemonldap-ng/_example/test/index.pl
@@ -75,6 +75,9 @@ td.emphase{
 background-color:#eee;
 font-weight:bold;
 }
+ul {
+list-style-type:none;
+}
 EOT
 
 # Read headers
@@ -123,8 +126,9 @@ foreach(sort keys %$headers) {
     <td $style><tt>\$_SERVER{$headers->{$_}}</tt></td>
     <td $style><ul>";
     foreach( split( /;/, $ENV{$headers->{$_}} ) ) {
-        print "<li>$_</li>";
+        print "<li>$_</li>" if $_ ne " ";
     }
+    print "☒" unless $ENV{$headers->{$_}};
     print "</ul></td>
     </tr>\n";
 }
@@ -142,7 +146,7 @@ foreach(sort keys %ENV) {
     $tmp =~ s/&/&amp;/g;
     $tmp =~ s/>/&gt;/g;
     $tmp =~ s/</&lt;/g;
-    print "<tr><td>$_</td><td>=&gt; $tmp</td></tr>\n";
+    print "<tr><td>$_</td><td><big>☞</big> $tmp</td></tr>\n";
 }
 print "</table>\n";
 print "</div>\n";