# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1467213752 -10800
# Node ID 992d8c1c72e6bdba7b2ff8d346f2ca540d9b0018
# Parent  f09650f2e7a880dd59a3a46af22d874139cc632f
Indentation and formatting cleanups.

diff -r f09650f2e7a8 -r 992d8c1c72e6 nun/tasks/findreqs.pl
--- a/nun/tasks/findreqs.pl	Sat Jan 02 18:09:48 2016 +0200
+++ b/nun/tasks/findreqs.pl	Wed Jun 29 18:22:32 2016 +0300
@@ -65,14 +65,20 @@
 ### Print out the results
 $n = 0;
 if ($#ARGV >= 0) {
-  if ($ARGV[0] eq "-tasks") {
-    for my $taskName (sort keys %taskList) {
+  if ($ARGV[0] eq "-tasks")
+  {
+    for my $taskName (sort keys %taskList)
+    {
       print $taskName."\n";
     }
-  } elsif ($ARGV[0] eq "-dump") {
-    for my $taskName (sort keys %taskList) {
+  }
+  elsif ($ARGV[0] eq "-dump")
+  {
+    for my $taskName (sort keys %taskList)
+    {
       print $taskName."|";
-      for my $skillName (sort keys %{$taskList{$taskName}}) {
+      for my $skillName (sort keys %{$taskList{$taskName}})
+      {
         print $skillName."=".$taskList{$taskName}{$skillName}."|";
       }
       print "\n";
@@ -98,7 +104,8 @@
     }
     elsif ($i == 1)
     {
-      for my $skillName (sort keys %{$taskList{$taskName}}) {
+      for my $skillName (sort keys %{$taskList{$taskName}})
+      {
         printf "| %-32s | %-25s | %3d |\n", $taskName, $skillName, $taskList{$taskName}{$skillName};
       }
       $sepLine = 0;
@@ -107,7 +114,8 @@
     {
       print_separator() if (!$sepLine);
       printf "| %-66s |\n", $taskName;
-      for my $skillName (sort keys %{$taskList{$taskName}}) {
+      for my $skillName (sort keys %{$taskList{$taskName}})
+      {
         printf "| %-32s | %-25s | %3d |\n", "", $skillName, $taskList{$taskName}{$skillName};
       }
       print_separator();