t/wrt.t: whitespace

t/wrt.t

@@ -12,39 +12,39 @@ chdir 'example';
 
 # 'configuration';
 
-    ok(
-      my $w = App::WRT::new_from_file('wrt.json'),
-      "Got WRT object."
-    );
+  ok(
+    my $w = App::WRT::new_from_file('wrt.json'),
+    "Got WRT object."
+  );
 
 # 'individual subroutine tests';
 
-    ok(
-      $w->recent_month() =~ m/\d{4}\/\d{1,2}/,
-      'recent_month returns a month'
-    );
+  ok(
+    $w->recent_month() =~ m/\d{4}\/\d{1,2}/,
+    'recent_month returns a month'
+  );
 
-    my $datestamp = $w->datestamp('2014/1/1/test_entry');
-    # diag($datestamp);
+  my $datestamp = $w->datestamp('2014/1/1/test_entry');
+  # diag($datestamp);
 
-    ok(
-      $datestamp =~ m{test_entry},
-      'datestamp for a fragment references that fragment'
-    );
+  ok(
+    $datestamp =~ m{test_entry},
+    'datestamp for a fragment references that fragment'
+  );
 
 # icon rendering
 
-    my $with_icon = $w->display('icon_test');
-    # diag($with_icon);
+  my $with_icon = $w->display('icon_test');
+  # diag($with_icon);
 
-    ok(
-       $with_icon =~ m/img src/,
-      'icon_test has an image in it'
-    );
+  ok(
+    $with_icon =~ m/img src/,
+    'icon_test has an image in it'
+  );
 
 # rendering static html files
 
-#   ok(
-#     $w->render(),
-#     'render stuff'
-#   );
+# ok(
+#   $w->render(sub { diag($_[0]); }),
+#   'render stuff'
+# );