Patch for list elements

Index: Render.pm
===================================================================
--- Render.pm   (revision 16847)
+++ Render.pm   (working copy)
@@ -62,6 +62,13 @@
 <span class="foswikiNewLink">$text<a href="%SCRIPTURLPATH{"edit"}%/$web/$topic?topicparent=%WEB%.%TOPIC%" rel="nofollow" title="%MAKETEXT{"Create this topic"}%">?</a></span>
 NLF

+my %list_types = (
+    A => 'upper-alpha',
+    a => 'lower-alpha',
+    i => 'lower-roman',
+    I => 'upper-roman'
+    );
+
 BEGIN {

     # Do a dynamic 'use locale' for this module
@@ -440,12 +447,12 @@
                 $isList = 1;
             }
             elsif ( $line =~ m/^((\t|   )+)([1AaIi]\.|\d+\.?) ?/ ) {
-
                 # Numbered list
                 my $ot = $3;
                 $ot =~ s/^(.).*/$1/;
                 if ( $ot !~ /^\d$/ ) {
-                    $ot = ' type="' . $ot . '"';
+           # Use style="list-type-type:"
+                    $ot = ' style="list-style-type:' . $list_types{$ot} . '"';
                 }
                 else {
                     $ot = '';