X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=maint%2Fsynopsis-extractor;h=f23a99981a3287465c836a86b56e22ed59ad117e;hb=6330577f9b87576d25c819b1e061a4cb6d962085;hp=9390373033841e52b1476f41236ecfd2ddf319e6;hpb=ef48fc36a1f6dbf53867abf16e478fffe7889967;p=catagits%2FHTML-Zoom.git

diff --git a/maint/synopsis-extractor b/maint/synopsis-extractor
index 9390373..f23a999 100755
--- a/maint/synopsis-extractor
+++ b/maint/synopsis-extractor
@@ -66,10 +66,10 @@ sub create_or_update_test {
 find(sub {
     return unless $_=~/pm$/;
     create_or_update_test(
-        create_test_string
+        (create_test_string
         normalize_indent
         extract_synopsis
-        slurp_file $File::Find::name,
+        slurp_file $File::Find::name),
         create_test_path_from_lib($_),
     );
 }, File::Spec->catfile($Bin, '..', 'lib'));