improved debug messages for sql queries

This commit is contained in:
Graham Knop 2008-08-19 17:36:02 +00:00
parent ce230795aa
commit 00fcdf40df
3 changed files with 29 additions and 7 deletions

View file

@ -301,6 +301,19 @@ sub getId {
#-------------------------------------------------------------------
=head2 hasSettings
Checks if the settings have been initialized yet
=cut
sub hasSettings {
my $self = shift;
return exists $self->{_setting};
}
#-------------------------------------------------------------------
=head2 http ( )
Returns a reference to the WebGUI::Session::Http object.