Emulate git --help including terminal escapes.
our $VERSION = '1.02';
use Getopt::Long '2.33', qw( :config gnu_getopt );
our $VERSION = '1.02';
use Getopt::Long '2.33', qw( :config gnu_getopt );
-sub podexit { require Pod::Usage; Pod::Usage::pod2usage(-exitval => 0, @_) }
+sub podexit {
+ require Pod::Usage;
+ Pod::Usage::pod2usage(-exitval => 0, -perldocopt => '-oman', @_);
+}
GetOptions(\my %opt,
'color|c!',
'follow|f:i',
GetOptions(\my %opt,
'color|c!',
'follow|f:i',