append to log

this fixes HUGE bug which overwrites log file with every new tag :-(

diff --git a/scripts/print.pl b/scripts/print.pl
index 701447e..476a64e 100755 (executable)
--- a/scripts/print.pl
+++ b/scripts/print.pl
@@ -89,7 +89,7 @@ die "$log_path exists" if -e $log_path;
 
 sub write_log {
        my ( $tag, $number ) = @_;
-       open(my $log, '>', $log_path) || die "$log_path: $!";
+       open(my $log, '>>', $log_path) || die "$log_path: $!";
        my $date = iso_date;
        print $log "$date,$tag,$number\n";
        close($log);