Add tool for pulling bugs from Bugzilla.

[todo.git] / todo_utils.ml

diff --git a/todo_utils.ml b/todo_utils.ml
index 27f13dd..872cfc7 100644 (file)
--- a/todo_utils.ml
+++ b/todo_utils.ml
@@ -59,3 +59,15 @@ let string_of_estimate period =
   else if days = 1 then append "1 day";
   let str = Buffer.contents buf in
   if str <> "" then str else "-"
+
+let heading fs =
+  let display str =
+    printf "\x1b[%d;%dm%s:\x1b[0m\n" 0 35 str
+  in
+  ksprintf display fs
+
+let string_of_taskid id =
+  sprintf "\x1b[%d;%dm#%ld\x1b[0m" 1 34 id
+
+let string_of_task_desc desc =
+  sprintf "\x1b[1m%s\x1b[0m" desc