Author: richter Date: Sun Oct 1 11:53:55 2023 New Revision: 1912654 URL: http://svn.apache.org/viewvc?rev=1912654&view=rev Log: remove warnings about uninitialized values
Modified: perl/embperl/trunk/ (props changed) perl/embperl/trunk/Changes.pod perl/embperl/trunk/Embperl/App.pm perl/embperl/trunk/Embperl/Inline.pm perl/embperl/trunk/Embperl/Mail.pm perl/embperl/trunk/Embperl/Module.pm perl/embperl/trunk/Embperl/Object.pm perl/embperl/trunk/Embperl/Recipe.pm perl/embperl/trunk/Embperl/Recipe/Embperl.pm perl/embperl/trunk/Embperl/Recipe/EmbperlLibXSLT.pm perl/embperl/trunk/Embperl/Recipe/EmbperlPODXSLT.pm perl/embperl/trunk/Embperl/Recipe/EmbperlXSLT.pm perl/embperl/trunk/Embperl/Recipe/EmbperlXalanXSLT.pm perl/embperl/trunk/Embperl/Recipe/LibXSLT.pm perl/embperl/trunk/Embperl/Recipe/XSLT.pm perl/embperl/trunk/Embperl/Recipe/XalanXSLT.pm perl/embperl/trunk/Embperl/Run.pm perl/embperl/trunk/Embperl/Session.pm perl/embperl/trunk/Embperl/Syntax.pm perl/embperl/trunk/Embperl/Util.pm perl/embperl/trunk/eg/web/menuleft.epl Propchange: perl/embperl/trunk/ ------------------------------------------------------------------------------ --- svn:ignore (original) +++ svn:ignore Sun Oct 1 11:53:55 2023 @@ -16,7 +16,7 @@ Embperl.bs *.dsp *.dsw embperl.code-workspace -.vscode/ +.vscode MYMETA.json MYMETA.yml embpfastcgi.pl @@ -26,15 +26,15 @@ epocgi.bat epocgi.pl epocgi.test.pl test/conf/config.pl -xs/ -xsbuilder/tables/ +xs +xsbuilder/tables *.o *.old *.orig *.rej -patches/ +patches Embperl.bso -test/tmp/ +test/tmp test/conf/httpd.conf test/conf/httpd.min.conf test/conf/httpd.stop.conf Modified: perl/embperl/trunk/Changes.pod URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Changes.pod?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Changes.pod (original) +++ perl/embperl/trunk/Changes.pod Sun Oct 1 11:53:55 2023 @@ -12,8 +12,12 @@ (https://rt.cpan.org/Public/Bug/Display.html?id=148621 and https://rt.cpan.org/Public/Bug/Display.html?id=148702) Thanks to Marcus Doemling - - Fix compilation/Makefile of/for libxml2 and libxslt - - Fix warnings about undefined values in log + - Fixed compilation/Makefile of/for libxml2 and libxslt + - Fixed warnings about undefined values in log. Note this + is done by goning back to the old behaviour, were + using uninitialized values were not a warning. So if + you like to have warnings about uninitialized values + add [* use warnings "uninitialized" *] to your code. - Add a lot of enhancements to Embperl::Form =head1 2.5.0 16. March 2014 Modified: perl/embperl/trunk/Embperl/App.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/App.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/App.pm (original) +++ perl/embperl/trunk/Embperl/App.pm Sun Oct 1 11:53:55 2023 @@ -20,6 +20,8 @@ package Embperl::App ; use strict ; use vars qw{%Recipes} ; +no warnings "uninitialized" ; + # --------------------------------------------------------------------------------- # # Get/create named recipe Modified: perl/embperl/trunk/Embperl/Inline.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Inline.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Inline.pm (original) +++ perl/embperl/trunk/Embperl/Inline.pm Sun Oct 1 11:53:55 2023 @@ -21,6 +21,8 @@ package Embperl::Inline ; use strict ; use vars qw{$options} ; +no warnings "uninitialized" ; + sub import { if (ref $_[1] eq 'HASH') Modified: perl/embperl/trunk/Embperl/Mail.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Mail.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Mail.pm (original) +++ perl/embperl/trunk/Embperl/Mail.pm Sun Oct 1 11:53:55 2023 @@ -26,6 +26,8 @@ use vars qw( $VERSION ) ; +no warnings "uninitialized" ; + @ISA = qw(Embperl); Modified: perl/embperl/trunk/Embperl/Module.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Module.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Module.pm (original) +++ perl/embperl/trunk/Embperl/Module.pm Sun Oct 1 11:53:55 2023 @@ -21,6 +21,8 @@ use Embperl ; $VERSION = '2.0.0'; +no warnings "uninitialized" ; + # define subs Modified: perl/embperl/trunk/Embperl/Object.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Object.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Object.pm (original) +++ perl/embperl/trunk/Embperl/Object.pm Sun Oct 1 11:53:55 2023 @@ -26,6 +26,8 @@ require DynaLoader; use Embperl ; use Embperl::Constant ; +no warnings "uninitialized" ; + use constant OK => 0 ; use constant NOT_FOUND => 404 ; use constant FORBIDDEN => 403 ; Modified: perl/embperl/trunk/Embperl/Recipe.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe.pm (original) +++ perl/embperl/trunk/Embperl/Recipe.pm Sun Oct 1 11:53:55 2023 @@ -20,6 +20,8 @@ package Embperl::Recipe ; use strict ; use vars qw{@ISA @EXPORT_OK %EXPORT_TAGS %Recipes} ; +no warnings "uninitialized" ; + # --------------------------------------------------------------------------------- # Modified: perl/embperl/trunk/Embperl/Recipe/Embperl.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/Embperl.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/Embperl.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/Embperl.pm Sun Oct 1 11:53:55 2023 @@ -19,6 +19,8 @@ package Embperl::Recipe::Embperl ; use strict ; use vars qw{@ISA} ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/EmbperlLibXSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/EmbperlLibXSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/EmbperlLibXSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/EmbperlLibXSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe::EmbperlXSLT ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe::EmbperlXSLT') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/EmbperlPODXSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/EmbperlPODXSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/EmbperlPODXSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/EmbperlPODXSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe::Embperl ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe::EmbperlXSLT') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/EmbperlXSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/EmbperlXSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/EmbperlXSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/EmbperlXSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe::Embperl ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe::Embperl') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/EmbperlXalanXSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/EmbperlXalanXSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/EmbperlXalanXSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/EmbperlXalanXSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe::EmbperlXSLT ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe::EmbperlXSLT') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/LibXSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/LibXSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/LibXSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/LibXSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe::XSLT ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe::XSLT') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/XSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/XSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/XSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/XSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Recipe/XalanXSLT.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Recipe/XalanXSLT.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Recipe/XalanXSLT.pm (original) +++ perl/embperl/trunk/Embperl/Recipe/XalanXSLT.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,8 @@ use vars qw{@ISA} ; use Embperl::Recipe::XSLT ; +no warnings "uninitialized" ; + @ISA = ('Embperl::Recipe::XSLT') ; # --------------------------------------------------------------------------------- Modified: perl/embperl/trunk/Embperl/Run.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Run.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Run.pm (original) +++ perl/embperl/trunk/Embperl/Run.pm Sun Oct 1 11:53:55 2023 @@ -22,6 +22,7 @@ use Embperl::Log ; use Getopt::Long ; +no warnings "uninitialized" ; sub run (;\@$) Modified: perl/embperl/trunk/Embperl/Session.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Session.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Session.pm (original) +++ perl/embperl/trunk/Embperl/Session.pm Sun Oct 1 11:53:55 2023 @@ -129,6 +129,8 @@ $VERSION = '2.0.0'; use Apache::Session; +no warnings "uninitialized" ; + use constant NEW => Apache::Session::NEW () ; use constant MODIFIED => Apache::Session::MODIFIED () ; use constant DELETED => Apache::Session::DELETED () ; Modified: perl/embperl/trunk/Embperl/Syntax.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Syntax.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Syntax.pm (original) +++ perl/embperl/trunk/Embperl/Syntax.pm Sun Oct 1 11:53:55 2023 @@ -21,6 +21,8 @@ package Embperl::Syntax ; use strict ; use vars qw{@ISA @EXPORT_OK %EXPORT_TAGS %DocumentRoot %Syntax} ; +no warnings "uninitialized" ; + @ISA = qw{Exporter} ; use constant ntypTag => 1 ; @@ -317,7 +319,7 @@ sub CloneHash %DocumentRoot = ( '-lsearch' => 1, - # The document node is generated always and is not parserd, but can be used to include code + # The document node is generated always and is not parsed, but can be used to include code 'Document' => { 'nodename' => 'Document', 'nodetype' => ntypDocument, @@ -327,8 +329,10 @@ sub CloneHash # any initialisation could be put here #$DB::single = 1 ; $maxrow=100;$maxcol=10; +no warnings "uninitialized" ; }, compiletimeperlcode => q{ +no warnings "uninitialized" ; use vars ('$_ep_DomTree', '@ISA', '@param') ; *_ep_rp=\\&XML::Embperl::DOM::Node::iReplaceChildWithCDATA; *_ep_rpid=\\&XML::Embperl::DOM::Node::iReplaceChildWithMsgId; @@ -351,7 +355,7 @@ Embperl::Util::CreateAliases ; } }, }, - # The document fraq node is generated always and is not parserd, but can be used to include code + # The document fraq node is generated always and is not parsed, but can be used to include code 'DocumentFraq' => { 'nodename' => 'DocumentFraq', 'nodetype' => ntypDocumentFraq, @@ -360,8 +364,10 @@ Embperl::Util::CreateAliases ; perlcode => q{ #my $_ep_param_save = \@param ; #*param = $Embperl::req -> component -> param -> param || []; +no warnings "uninitialized" ; }, compiletimeperlcode => q{ +no warnings "uninitialized" ; use vars ('$_ep_DomTree', '@ISA', '@param') ; *_ep_rp=\\&XML::Embperl::DOM::Node::iReplaceChildWithCDATA; *_ep_rpid=\\&XML::Embperl::DOM::Node::iReplaceChildWithMsgId; Modified: perl/embperl/trunk/Embperl/Util.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Util.pm?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Util.pm (original) +++ perl/embperl/trunk/Embperl/Util.pm Sun Oct 1 11:53:55 2023 @@ -19,6 +19,8 @@ package Embperl::Util ; use strict ; use vars qw{@AliasScalar @AliasHash @AliasArray %NameSpace} ; +no warnings "uninitialized" ; + ####################################################################################### sub AddCompartment ($) Modified: perl/embperl/trunk/eg/web/menuleft.epl URL: http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/menuleft.epl?rev=1912654&r1=1912653&r2=1912654&view=diff ============================================================================== --- perl/embperl/trunk/eg/web/menuleft.epl (original) +++ perl/embperl/trunk/eg/web/menuleft.epl Sun Oct 1 11:53:55 2023 @@ -1,4 +1,4 @@ - +[* no warnings "uninitialized" ; *] [$ sub menuitem $] [* my ($url, $txt, $state, $tablebg, $ndx) = @_ ; --------------------------------------------------------------------- To unsubscribe, e-mail: embperl-cvs-unsubscr...@perl.apache.org For additional commands, e-mail: embperl-cvs-h...@perl.apache.org