summaryrefslogtreecommitdiffstats
path: root/kig/generate_todo_inc.pl
diff options
context:
space:
mode:
authortoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
committertoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
commitce599e4f9f94b4eb00c1b5edb85bce5431ab3df2 (patch)
treed3bb9f5d25a2dc09ca81adecf39621d871534297 /kig/generate_todo_inc.pl
downloadtdeedu-ce599e4f9f94b4eb00c1b5edb85bce5431ab3df2.tar.gz
tdeedu-ce599e4f9f94b4eb00c1b5edb85bce5431ab3df2.zip
Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.
BUG:215923 git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdeedu@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'kig/generate_todo_inc.pl')
-rw-r--r--kig/generate_todo_inc.pl26
1 files changed, 26 insertions, 0 deletions
diff --git a/kig/generate_todo_inc.pl b/kig/generate_todo_inc.pl
new file mode 100644
index 00000000..6999f217
--- /dev/null
+++ b/kig/generate_todo_inc.pl
@@ -0,0 +1,26 @@
+#! /usr/bin/env perl
+
+use warnings;
+
+print "<ul>\n";
+open( TODO, "<TODO" );
+while( <TODO> )
+ {
+ if( /^\* (.*)$/ )
+ {
+ print "</li></ul></li>\n\n" if( $inlist );
+ print "<li><span style=\"font-weight:bold\">$1</span><br/>\n";
+ $inlist = 0;
+ $initem = 0;
+ }
+ elsif( /^- (.*)$/ )
+ {
+ if( $initem ) { print "</li>"; };
+ print "<ul>\n" if( ! $inlist );
+ $inlist = 1;
+ print "<li>$1\n";
+ $initem = 1;
+ }
+ else { print unless /^$/; }
+ };
+print "</li></ul></li></ul>\n";