From: Hendrik Lippek <hendrik.lippek@avionic-design.de>
Date: Mon, 7 Feb 2011 23:44:09 +0000 (+0100)
Subject: Add "notes" field to planner2csv.pl
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b435e548736889a3afc09d658742853b26152e6c;p=planner-tools.git

Add "notes" field to planner2csv.pl

The notes field may contain useful information about the tasks.
So add this field to the .csv file.
---

diff --git a/planner2csv.pl b/planner2csv.pl
index a88d413..d4b99d6 100755
--- a/planner2csv.pl
+++ b/planner2csv.pl
@@ -30,7 +30,7 @@ my $csv = Text::CSV_XS->new();
 my %id_map;
 
 my @headers = ('id', 'description', 'allocated', 'start', 'end', 'duration (s)', 'percent complete',
-  'predecessor');
+  'predecessor', 'note');
 my %headers;
 for my $i (0..$#headers) {
   $headers{$headers[$i]} = $i;
@@ -81,6 +81,8 @@ sub find_tasks {
 
     push @fields, find_predecessors($task);
 
+    push @fields, $task->findvalue('@note');
+
     push @rows, \@fields;
 
     push @id, '0';