Skip Menu |

This queue is for tickets about the Doxygen-Filter-Perl CPAN distribution.

Report information
The Basics
Id: 106124
Status: new
Priority: 0/
Queue: Doxygen-Filter-Perl
People
Owner: Nobody in particular
Requestors: gmax [...] portaone.com
Cc:
AdminCc:
Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)
Attachments
public.png
test_doc.tar.gz

History Show all quoted text
  Tue Jul 28 05:55:49 2015 gmax [...] portaone.com - Ticket created
Subject: [Q] Move private methods to Public Member Functions block
Date: Tue, 28 Jul 2015 12:55:34 +0300
To: bug-Doxygen-Filter-Perl [...] rt.cpan.org
From: Maxim Gusakov <gmax [...] portaone.com>
Hi, Reproduced on 1.72 Is it intentional behavior that if method is marked as @private, it still appears in "Public Member Functions" block in generated html doc? I understand that there is no true encapsulation for perl methods, and you can invoke "private" methods outside of a class, but still, wouldn't it be more logical to put @private methods to Private block? Below are files to reproduce the problem. -- Max
Download test_doc.tar.gz
application/x-gzip 22k

Message body not shown because it is not plain text.

Download public.png
image/png 25.4k

Message body is not shown because sender requested not to inline it.

  Tue Jul 28 07:14:37 2015 gmax [...] portaone.com - Correspondence added
Subject: [rt.cpan.org #106124][Q] Move private methods to Public Member Functions block
Date: Tue, 28 Jul 2015 14:14:22 +0300
To: bug-Doxygen-Filter-Perl [...] rt.cpan.org
From: Maxim Gusakov <gmax [...] portaone.com>
Probably following patch should work (at least for methods) diff -u /usr/lib/perl5/site_perl/5.18.1/Doxygen/Filter/Perl.pm_bak /usr/lib/perl5/site_perl/5.18.1/Doxygen/Filter/Perl.pm --- /usr/lib/perl5/site_perl/5.18.1/Doxygen/Filter/Perl.pm_bak 2015-07-28 14:02:24.733261764 +0300 +++ /usr/lib/perl5/site_perl/5.18.1/Doxygen/Filter/Perl.pm 2015-07-28 14:09:21.680792640 +0300 @@ -588,7 +588,7 @@ } } print "\n{\n"; - print "public:\n"; + #print "public:\n"; } sub _PrintMethodBlock @@ -640,7 +640,7 @@ print "</div>\n"; print "\@endhtmlonly */\n"; - print "$state $returntype $method\($parameters\)\;\n"; + print "$state: $returntype $method\($parameters\)\;\n"; } sub _ProcessPerlMethod -- Max