Index: TWiki.pm
===================================================================
RCS file: /cvsroot/twiki/twiki/lib/TWiki.pm,v
retrieving revision 1.254
diff -c -r1.254 TWiki.pm
*** TWiki.pm    4 Jan 2004 11:57:17 -0000       1.254
--- TWiki.pm    6 Jan 2004 07:54:16 -0000
***************
*** 1731,1736 ****
--- 1731,1740 ----
      # get the depth limit attribute
      my $depth = extractNameValuePair( $_[3], "depth" ) || 6;

+     #get the title attribute
+     my $title = extractNameValuePair( $_[3], "title" );
+     #$title = "\n$title" if( $title );
+
      my $result  = "";
      my $line  = "";
      my $level = "";
***************
*** 1812,1818 ****
              $highest--;
              $result =~ s/^\t{$highest}//gm;
          }
!         $result = "<div class='twikitoc'>$result\n</div>";
          return $result;

      } else {
--- 1816,1822 ----
              $highest--;
              $result =~ s/^\t{$highest}//gm;
          }
!         $result = "<div id='twikitoc'><span class='title'>$title</span>$result\n</div>";
          return $result;

      } else {