From fd37672738fcc11e50f9494e774883aba9405461 Mon Sep 17 00:00:00 2001 From: Ed J Date: Mon, 6 Mar 2023 03:30:03 +0000 Subject: [PATCH] zap object-constructing SYNOPSIS in submodules --- genpp.pl | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/genpp.pl b/genpp.pl index 0d157cf..acc3d31 100644 --- a/genpp.pl +++ b/genpp.pl @@ -315,14 +315,11 @@ sub genheader { my %class2doc = map +($_->[0]=>$_->[1]), @classdata; my @classes = sort keys %class2doc; my $descrip_label = @classes ? join(', ', @classes) : $last; - my $synopsis = join '', map "\n \$obj = PDL::OpenCV::$_->new@{[ - @{$extra_cons_args{$_} || []} ? '('.join(', ', map qq{\$$_->[1]}, @{$extra_cons_args{$_} || []}).')' : '' - ]};", @classes; pp_addpm({At=>'Top'},<<"EOPM"); =head1 NAME \nPDL::OpenCV::$last - PDL bindings for OpenCV $descrip_label \n=head1 SYNOPSIS -\n use PDL::OpenCV::$last;$synopsis +\n use PDL::OpenCV::$last; \n=cut \nuse strict; use warnings;