MANIFEST

@@ -29,7 +29,6 @@ lib/App/Ack/Docs/Manual.pm lib/App/Ack/Docs/FAQ.pm lib/App/Ack/Docs/Cookbook.pm -record-options squash test-pager 

dev/record-options

new file mode 100755@@ -0,0 +1,30 @@+#!/usr/bin/env perl++use strict;+use warnings;++use blib;+use App::Ack::ConfigLoader ();+use Getopt::Long;++my $option_coverage_file = 'opts.coverage';++my @extra_options = (+    'type-add=s',+    'type-set=s',+    'dump',+);++my $fh;+open $fh, '>>', $option_coverage_file or die $!;++my $arg_spec = App::Ack::ConfigLoader::get_arg_spec({}, undef);+foreach my $k (keys %{$arg_spec}, @extra_options) {+    $arg_spec->{$k} = sub {+        print { $fh } "$k\n";+    };+}+Getopt::Long::Configure('pass_through');+GetOptions(%{$arg_spec});++close $fh;

record-options

deleted file mode 100755@@ -1,29 +0,0 @@-#!/usr/bin/env perl--use strict;-use warnings;--use App::Ack::ConfigLoader ();-use Getopt::Long;--my $option_coverage_file = 'opts.coverage';--my @extra_options = (-    'type-add=s',-    'type-set=s',-    'dump',-);--my $fh;-open $fh, '>>', $option_coverage_file or die $!;--my $arg_spec = App::Ack::ConfigLoader::get_arg_spec({}, undef);-foreach my $k (keys %{$arg_spec}, @extra_options) {-    $arg_spec->{$k} = sub {-        print { $fh } "$k\n";-    };-}-Getopt::Long::Configure('pass_through');-GetOptions(%{$arg_spec});--close $fh;

t/Util.pm

@@ -547,7 +547,7 @@ sub _record_option_coverage {     return unless $ENV{ACK_OPTION_COVERAGE};     return if $ENV{ACK_TEST_STANDALONE}; # We don't need to record the second time around. -    my $record_options = File::Spec->catfile($orig_wd, 'record-options');+    my $record_options = File::Spec->catfile( $orig_wd, 'dev', 'record-options' );      my $perl = caret_X();     if ( @command_line == 1 ) {