[TWiki-Dev] [SVN] PeterThoeny r23701 - twiki/trunk/core/lib/TWiki

[<de...@de...>]

Author: PeterThoeny
Date: 2012-10-20 01:35:36 -0500 (Sat, 20 Oct 2012)
New Revision: 23701
Trac url: http://develop.twiki.org/trac/changeset/23701

Modified:
   twiki/trunk/core/lib/TWiki/Render.pm
Log:
Item7003: Icon bullet lists feature - adding icon bullet TML handling

Modified: twiki/trunk/core/lib/TWiki/Render.pm
===================================================================
--- twiki/trunk/core/lib/TWiki/Render.pm	2012-10-20 06:34:32 UTC (rev 23700)
+++ twiki/trunk/core/lib/TWiki/Render.pm	2012-10-20 06:35:36 UTC (rev 23701)
@@ -1185,8 +1185,13 @@
                 _addListItem( $this, \@result, 'dl', 'dd', $1 );
                 $isList = 1;
             }
+            elsif ( $line =~ s/^((\t|   )+)\* icon:([^ ]+) /'<li class="twikiIconBullet" style="background: url(' . $session->formatIcon( $3, '$urlpath', 'blank' ) . ') no-repeat 0 .2em;"> '/eo ) {
+                # Unordered list with bullet icon
+                _addListItem( $this, \@result, 'ul', 'li', $1 );
+                $isList = 1;
+            }
             elsif ( $line =~ s/^((\t|   )+)\* /<li> /o ) {
-                # Unnumbered list
+                # Unordered list
                 _addListItem( $this, \@result, 'ul', 'li', $1 );
                 $isList = 1;
             }