Front page | perl.cvs.p5ee |
Postings from April 2013
[svn:p5ee] r15614 - in p5ee/trunk/App-Context: . lib lib/App lib/App/Authentication lib/App/CallDispatcher lib/App/Conf lib/App/Context lib/App/Context/POE lib/App/Request lib/App/ResourceLocker lib/App/Serializer lib/App/Session
From:
spadkins
Date:
April 1, 2013 21:53
Subject:
[svn:p5ee] r15614 - in p5ee/trunk/App-Context: . lib lib/App lib/App/Authentication lib/App/CallDispatcher lib/App/Conf lib/App/Context lib/App/Context/POE lib/App/Request lib/App/ResourceLocker lib/App/Serializer lib/App/Session
Message ID:
20130401215309.8EE57184B9C@xx12.develooper.com
Author: spadkins
Date: Mon Apr 1 14:53:08 2013
New Revision: 15614
Modified:
p5ee/trunk/App-Context/MANIFEST
p5ee/trunk/App-Context/Makefile.PL
p5ee/trunk/App-Context/lib/App.pm
p5ee/trunk/App-Context/lib/App/Authentication.pm
p5ee/trunk/App-Context/lib/App/Authentication/Htpasswd.pm
p5ee/trunk/App-Context/lib/App/Authorization.pm
p5ee/trunk/App-Context/lib/App/CallDispatcher.pm
p5ee/trunk/App-Context/lib/App/CallDispatcher/HTTPSimple.pm
p5ee/trunk/App-Context/lib/App/Conf.pm
p5ee/trunk/App-Context/lib/App/Conf.pod
p5ee/trunk/App-Context/lib/App/Conf/File.pm
p5ee/trunk/App-Context/lib/App/Conf/File.pod
p5ee/trunk/App-Context/lib/App/Context.pm
p5ee/trunk/App-Context/lib/App/Context/Cmd.pm
p5ee/trunk/App-Context/lib/App/Context/HTTP.pm
p5ee/trunk/App-Context/lib/App/Context/ModPerl.pm
p5ee/trunk/App-Context/lib/App/Context/NetServer.pm
p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm
p5ee/trunk/App-Context/lib/App/Context/Server.pm
p5ee/trunk/App-Context/lib/App/MessageDispatcher.pm
p5ee/trunk/App-Context/lib/App/Reference.pm
p5ee/trunk/App-Context/lib/App/Request.pm
p5ee/trunk/App-Context/lib/App/Request/CGI.pm
p5ee/trunk/App-Context/lib/App/ResourceLocker.pm
p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCLocker.pm
p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCSemaphore.pm
p5ee/trunk/App-Context/lib/App/Response.pm
p5ee/trunk/App-Context/lib/App/Serializer.pm
p5ee/trunk/App-Context/lib/App/Serializer/Ini.pm
p5ee/trunk/App-Context/lib/App/Serializer/Properties.pm
p5ee/trunk/App-Context/lib/App/Serializer/Storable.pm
p5ee/trunk/App-Context/lib/App/Serializer/TextArray.pm
p5ee/trunk/App-Context/lib/App/Serializer/Xml.pm
p5ee/trunk/App-Context/lib/App/Serializer/Yaml.pm
p5ee/trunk/App-Context/lib/App/Service.pm
p5ee/trunk/App-Context/lib/App/Session.pm
p5ee/trunk/App-Context/lib/App/Session/Cookie.pm
p5ee/trunk/App-Context/lib/App/Session/HTMLHidden.pm
p5ee/trunk/App-Context/lib/App/SessionObject.pm
p5ee/trunk/App-Context/lib/App/UserAgent.pm
p5ee/trunk/App-Context/lib/App/ValueDomain.pm
p5ee/trunk/App-Context/lib/App/devguide.pod
p5ee/trunk/App-Context/lib/App/quickstart.pod
Log:
added copyright. cleaned up inaccurate doc entries about exceptions.
Modified: p5ee/trunk/App-Context/MANIFEST
==============================================================================
--- p5ee/trunk/App-Context/MANIFEST (original)
+++ p5ee/trunk/App-Context/MANIFEST Mon Apr 1 14:53:08 2013
@@ -31,7 +31,6 @@
lib/App/datetime.pod
lib/App/devguide.pod
lib/App/Documentation.pm
-lib/App/Exceptions.pm
lib/App/exceptions.pod
lib/App/faq.pod
lib/App/installguide.pod
Modified: p5ee/trunk/App-Context/Makefile.PL
==============================================================================
--- p5ee/trunk/App-Context/Makefile.PL (original)
+++ p5ee/trunk/App-Context/Makefile.PL Mon Apr 1 14:53:08 2013
@@ -23,14 +23,11 @@
"App::Options" => "0.01", # for loading a startup configuration file
"CGI" => "0.01", # tbd
"CGI::Carp" => "0.01", # tbd
- "Class::Data::Inheritable" => "0.01", # [prereq for Exception::Class]
"Compress::Zlib" => "0.01", # for compressed serialization and browser responses
"Data::Dumper" => "0.01", # used for debugging
"Date::Parse" => "0.01", # date support
"Date::Format" => "0.01", # date support
- "Devel::StackTrace" => "0.01", # [prereq for Exception::Class]
"Digest::SHA" => "0.01", # tbd
- "Exception::Class" => "0.01", # allows exception hierarchies
"HTTP::Status" => "0.01", # tbd
"IO::Handle" => "0.01", # tbd
"IO::Socket" => "0.01", # tbd
Modified: p5ee/trunk/App-Context/lib/App.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App.pm (original)
+++ p5ee/trunk/App-Context/lib/App.pm Mon Apr 1 14:53:08 2013
@@ -11,13 +11,11 @@
# eliminate warnings about uninitialized values
$SIG{__WARN__} = sub { warn @_ unless $_[0] =~ /Use of uninitialized value/};
-use Exception::Class; # enable Exception inheritance
-use App::Exceptions;
use IO::Handle;
=head1 NAME
-App - Backplane for core App services
+App - Backplane for core App services (doc new as of 01-Jan-2011)
=head1 SYNOPSIS
@@ -188,8 +186,6 @@
=item * Class: L<C<App>|"Class: App">
-=item * Class: L<C<App::Reference>|App::Exceptions>
-
=item * Class: L<C<App::Reference>|App::Reference>
=item * Class: L<C<App::Service>|App::Service>
@@ -213,12 +209,6 @@
App is the main class through which all of the features
of the Perl 5 Enterprise Environment may be accessed.
- * Throws: Exception::Class::Base
- * Throws: App::Exception
- * Throws: App::Exception::Conf
- * Throws: App::Exception::Context
- * Since: 0.01
-
=head2 Class Design
The class is entirely made up of static (class) methods.
@@ -371,8 +361,6 @@
* Signature: App->use($class);
* Param: $class string [in]
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -395,7 +383,6 @@
Detailed Conditions:
- * use(001) class does not exist: throw a App::Exception
* use(002) class never used before: should succeed
* use(003) class used before: should succeed
* use(004) can use class after: should succeed
@@ -423,15 +410,11 @@
elsif ($class =~ /^([A-Za-z0-9_:]+)$/) {
eval "use $1;";
if ($@) {
- App::Exception->throw(
- error => "class $class failed to load: $@\n",
- );
+ die "class $class failed to load: $@\n";
}
}
else {
- App::Exception->throw(
- error => "Tried to load class [$class] with illegal characters\n",
- );
+ die "Tried to load class [$class] with illegal characters\n";
}
}
&App::sub_exit() if ($App::trace);
@@ -465,8 +448,6 @@
* Param: $skipatend integer [in]
* Param: @args any [in]
* Return: void
- * Throws: none
- * Since: 0.01
=cut
@@ -534,8 +515,6 @@
* Param: $method string [in]
* Return: $context App::Context
* Return: $object ref
- * Throws: Exception::Class::Base
- * Since: 0.01
Sample Usage:
@@ -591,8 +570,6 @@
* Param: config_file string [in]
* Param: prefix string [in]
* Return: $context App::Context
- * Throws: App::Exception::Context
- * Since: 0.01
Sample Usage:
@@ -712,8 +689,6 @@
* Param: conf_class class [in]
* Param: config_file string [in]
* Return: $conf App::Conf
- * Throws: App::Exception::Conf
- * Since: 0.01
This gets the Conf object from the Context.
@@ -744,8 +719,6 @@
* Signature: $ident = App->info();
* Param: void
* Return: $ident string
- * Throws: App::Exception
- * Since: 0.01
Gets version info about the framework.
@@ -780,8 +753,6 @@
* Signature: &App::sub_entry(@args);
* Param: @args any
* Return: void
- * Throws: none
- * Since: 0.01
This is called at the beginning of a subroutine or method (even before $self
may be shifted off).
@@ -908,8 +879,6 @@
* Signature: &App::sub_exit(@return);
* Param: @return any
* Return: void
- * Throws: none
- * Since: 0.01
This subroutine is called just before you return from a subroutine or method.
=cut
@@ -976,8 +945,6 @@
* Signature: App->in_debug_scope
* Param: <no arg list supplied>
* Return: void
- * Throws: none
- * Since: 0.01
This is called within a subroutine or method in order to see if debug output
should be produced.
@@ -1035,8 +1002,6 @@
* Signature: App->debug_indent()
* Param: void
* Return: $indent_str string
- * Throws: none
- * Since: 0.01
This subroutine returns the $indent_str string which should be printed
before all debug lines if you wish to line the debug output up with the
Modified: p5ee/trunk/App-Context/lib/App/Authentication.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Authentication.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Authentication.pm Mon Apr 1 14:53:08 2013
@@ -77,9 +77,6 @@
A Authentication service is a means by which a user may be authenticated
and by which he may be authorized to perform specific operations.
- * Throws: App::Exception::Authentication
- * Since: 0.01
-
=head2 Class Design
...
@@ -122,8 +119,6 @@
* Signature: $username = $auth->validate_password();
* Param: void
* Return: $username string
- * Throws: App::Exception::Authentication
- * Since: 0.01
Sample Usage:
@@ -145,7 +140,6 @@
* Signature: $service_type = App::Authentication->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $authen->service_type();
Modified: p5ee/trunk/App-Context/lib/App/Authentication/Htpasswd.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Authentication/Htpasswd.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Authentication/Htpasswd.pm Mon Apr 1 14:53:08 2013
@@ -52,8 +52,6 @@
* Signature: $username = $auth->validate_password();
* Param: void
* Return: $username string
- * Throws: App::Exception::Authentication
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Authorization.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Authorization.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Authorization.pm Mon Apr 1 14:53:08 2013
@@ -57,9 +57,6 @@
An Authorization service ...
- * Throws: App::Exception::Authorization
- * Since: 0.01
-
=head2 Class Design
...
@@ -107,8 +104,6 @@
* Param: $user string
* Param: $options HASH
* Return: $is_auth boolean
- * Throws: App::Exception::Authorization
- * Since: 0.01
Sample Usage:
@@ -152,7 +147,6 @@
* Signature: $service_type = App::Authorization->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $auth->service_type();
Modified: p5ee/trunk/App-Context/lib/App/CallDispatcher.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/CallDispatcher.pm (original)
+++ p5ee/trunk/App-Context/lib/App/CallDispatcher.pm Mon Apr 1 14:53:08 2013
@@ -70,9 +70,6 @@
A CallDispatcher service is a means by which a function call (perhaps remote)
may be made synchronously or asynchronously.
- * Throws: App::Exception::CallDispatcher
- * Since: 0.01
-
=head2 Class Design
...
@@ -118,8 +115,6 @@
* Param: $method string [in]
* Param: $args ARRAY [in]
* Return: @returnvals any
- * Throws: App::Exception::CallDispatcher
- * Since: 0.01
Sample Usage:
@@ -157,7 +152,6 @@
* Signature: $service_type = App::CallDispatcher->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $cdisp->service_type();
Modified: p5ee/trunk/App-Context/lib/App/CallDispatcher/HTTPSimple.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/CallDispatcher/HTTPSimple.pm (original)
+++ p5ee/trunk/App-Context/lib/App/CallDispatcher/HTTPSimple.pm Mon Apr 1 14:53:08 2013
@@ -44,9 +44,6 @@
The HTTPSimple does this by formatting a simple HTTP request using GET
or POST and parsing the results using a serializer.
- * Throws: App::Exception::CallDispatcher
- * Since: 0.01
-
=cut
#############################################################################
@@ -69,8 +66,6 @@
* Param: $method string [in]
* Param: $args ARRAY [in]
* Return: @returnvals any
- * Throws: App::Exception::CallDispatcher
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Conf.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Conf.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Conf.pm Mon Apr 1 14:53:08 2013
@@ -21,8 +21,6 @@
* Signature: $perl = $conf->dump();
* Param: void
* Return: $perl text
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Conf.pod
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Conf.pod (original)
+++ p5ee/trunk/App-Context/lib/App/Conf.pod Mon Apr 1 14:53:08 2013
@@ -133,9 +133,6 @@
=head1 Class: App::Conf
- * Throws: App::Exception::Conf
- * Since: 0.01
-
=head2 Design
The App::Conf class is a very thin code wrapper around a perl
@@ -184,8 +181,6 @@
* Param: configFile string
* Param: configSerializerClass class
* Return: $config App::Conf
- * Throws: App::Exception::Conf
- * Since: 0.01
Sample Usage:
@@ -218,8 +213,6 @@
* Signature: $property_value = $config->get($property_name);
* Param: $property_name string
* Return: $property_value string
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -238,8 +231,6 @@
* Signature: $branch = $config->get_branch($branch_name);
* Param: $branch_name string
* Return: $branch {}
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -265,8 +256,6 @@
* Signature: $perl = $config->dump();
* Param: void
* Return: $perl text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -300,8 +289,6 @@
* Signature: init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception::Conf
- * Since: 0.01
Sample Usage:
@@ -319,8 +306,6 @@
* Param: void
* Param: configFile string
* Return: $config_data {}
- * Throws: App::Exception::Conf
- * Since: 0.01
Sample Usage:
@@ -352,8 +337,6 @@
* Param: $config1 {}
* Param: $config2 {}
* Return: void
- * Throws: App::Exception::Conf
- * Since: 0.01
Sample Usage:
@@ -375,8 +358,6 @@
* Param: $branch_name string
* Param: $config2 {}
* Return: void
- * Throws: App::Exception::Conf
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Conf/File.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Conf/File.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Conf/File.pm Mon Apr 1 14:53:08 2013
@@ -38,9 +38,7 @@
}
# if a config file is specified, it must exist
if (! -r $conf_file) {
- App::Exception::Conf->throw(
- error => "create(): [$conf_file] $!\n"
- );
+ die "create(): [$conf_file] $!\n";
}
}
}
@@ -148,15 +146,11 @@
if ($serializer_class) {
eval "use $serializer_class;";
if ($@) {
- App::Exception::Conf->throw(
- error => "create(): error loading $serializer_class serializer class: $@\n"
- );
+ die "create(): error loading $serializer_class serializer class: $@\n";
}
$conf = $serializer_class->deserialize($text);
if (! %$conf) {
- App::Exception::Conf->throw(
- error => "create(): $serializer_class produced empty config\n"
- );
+ die "create(): $serializer_class produced empty config\n";
}
}
else { # don't bother with a serializer
@@ -165,15 +159,11 @@
$text = "\$conf = $1"; # untainted now
eval($text);
if ($@) {
- App::Exception::Conf->throw(
- error => "create(): [$conf_file] error eval'ing config text: $@\n"
- );
+ die "create(): [$conf_file] error eval'ing config text: $@\n";
}
}
else {
- App::Exception::Conf->throw(
- error => "create(): [$conf_file] config text doesn't match '\$var = {...};'\n"
- );
+ die "create(): [$conf_file] config text doesn't match '\$var = {...};'\n";
}
}
}
Modified: p5ee/trunk/App-Context/lib/App/Conf/File.pod
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Conf/File.pod (original)
+++ p5ee/trunk/App-Context/lib/App/Conf/File.pod Mon Apr 1 14:53:08 2013
@@ -88,9 +88,6 @@
=head1 Class: App::Conf::File
- * Throws: App::Exception::Conf
- * Since: 0.01
-
=head2 Design
The App::Conf::File class extends the App::Conf class,
@@ -179,8 +176,6 @@
* Param: void
* Param: configFile string
* Return: $config_data {}
- * Throws: App::Exception::Conf
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context.pm Mon Apr 1 14:53:08 2013
@@ -170,8 +170,6 @@
* Param: conf_class class [in]
* Param: conf_file string [in]
* Return: $context App::Context
- * Throws: Exception::Class::Context
- * Since: 0.01
Sample Usage:
@@ -410,8 +408,6 @@
* Signature: $context->_init($options)
* Param: $options {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -450,8 +446,6 @@
* Param: $type string [in]
* Param: $name string [in]
* Return: $service App::Service
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -542,9 +536,7 @@
# $type (i.e. SessionObject, Session, etc.) must be supplied
if (!defined $type) {
- App::Exception->throw(
- error => "cannot create a service of unknown type\n",
- );
+ die "cannot create a service of unknown type\n";
}
if (%named) {
@@ -856,8 +848,6 @@
* Signature: $session = $context->session($name,%named);
* Param: $name string [in]
* Return: $service App::Service
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -929,8 +919,6 @@
* Signature: $exists = $context->session_object_exists($session_object_name);
* Param: $session_object_name string
* Return: $exists boolean
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1038,8 +1026,6 @@
* Param: $var string
* Param: $attribute string
* Return: $value string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1072,8 +1058,6 @@
* Signature: $value = $context->get_user_option($var);
* Param: $var string
* Return: $value string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1110,8 +1094,6 @@
* Param: $service_name string
* Param: $attrib string
* Return: $attrib_value ANY
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1165,8 +1147,6 @@
* Param: $default any
* Param: $setdefault boolean
* Return: $value string,ref
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1277,8 +1257,6 @@
* Param: $attribute string
* Param: $value string,ref
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1372,8 +1350,6 @@
* Param: $session_objectname string
* Param: $attribute string
* Return: $value string,ref
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1401,8 +1377,6 @@
* Param: $session_objectname string
* Param: $attribute string
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1477,8 +1451,6 @@
* Param: $session_objectname string
* Param: $attribute string
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1577,8 +1549,6 @@
* Signature: $context->add_message($msg);
* Param: $msg string [in]
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1623,8 +1593,6 @@
* Param: level integer
* Param: @args string [in]
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1771,8 +1739,6 @@
* Signature: $username = $context->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1804,8 +1770,6 @@
* Signature: $options = $context->options();
* Param: void
* Return: $options {}
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1833,8 +1797,6 @@
* Signature: $conf = $context->conf();
* Param: void
* Return: $conf App::Conf
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -1861,8 +1823,6 @@
* Signature: $session = $context->session($session_id);
* Param: $session_id string
* Return: $session App::Session
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -2101,8 +2061,6 @@
* Param: $method string [in]
* Param: $level integer [in]
* Return: void
- * Throws: App::Exception::Context
- * Since: 0.01
Sample Usage:
@@ -2154,8 +2112,6 @@
* Signature: $flag = $context->dbgprint(@args);
* Param: @args string [in]
* Return: void
- * Throws: App::Exception::Context
- * Since: 0.01
Sample Usage:
@@ -2189,8 +2145,6 @@
* Signature: $dbglevel = $context->dbglevel();
* Param: $dbglevel integer
* Return: $dbglevel integer
- * Throws: App::Exception::Context
- * Since: 0.01
Sample Usage:
@@ -2221,8 +2175,6 @@
* Signature: $debug_scope = $context->debug_scope();
* Param: void
* Return: $debug_scope {}
- * Throws: App::Exception::Context
- * Since: 0.01
Sample Usage:
@@ -2251,8 +2203,6 @@
* Signature: $perl = $context->dump();
* Param: void
* Return: $perl text
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2289,8 +2239,6 @@
* Signature: $context->dispatch_events()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2420,8 +2368,6 @@
* Signature: $context->send_results()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2664,8 +2610,6 @@
* Signature: $self->wait_for_event($event_token)
* Param: $event_token string
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2760,8 +2704,6 @@
* Signature: $pid = $self->fork()
* Param: void
* Return: $pid integer
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2814,8 +2756,6 @@
* Signature: $self->shutdown_unshareable_resources()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2865,8 +2805,6 @@
* Signature: $self->shutdown()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -2920,8 +2858,6 @@
* Signature: $context->response()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context/Cmd.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/Cmd.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/Cmd.pm Mon Apr 1 14:53:08 2013
@@ -181,8 +181,6 @@
* Signature: $username = $context->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context/HTTP.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/HTTP.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/HTTP.pm Mon Apr 1 14:53:08 2013
@@ -75,8 +75,6 @@
* Signature: $context->_init($args)
* Param: $args hash{string} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -286,8 +284,6 @@
* Signature: $context->request()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -341,8 +337,6 @@
* Signature: $context->send_response()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -410,8 +404,6 @@
* Signature: $context->set_header()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -443,8 +435,6 @@
* Signature: $user_agent = $context->user_agent();
* Param: void
* Return: $user_agent App::UserAgent
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -480,8 +470,6 @@
* Signature: $username = $self->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context/ModPerl.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/ModPerl.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/ModPerl.pm Mon Apr 1 14:53:08 2013
@@ -74,8 +74,6 @@
# * Signature: $context->_init($args)
# * Param: $args hash{string} [in]
# * Return: void
-# * Throws: App::Exception
-# * Since: 0.01
#
# Sample Usage:
#
@@ -263,8 +261,6 @@
* Signature: $context->request()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context/NetServer.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/NetServer.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/NetServer.pm Mon Apr 1 14:53:08 2013
@@ -77,8 +77,6 @@
* Signature: $context->_init($args)
* Param: $args hash{string} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -116,8 +114,6 @@
* Signature: $context->dispatch_events()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -219,8 +215,6 @@
* Signature: $context->send_response()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -270,8 +264,6 @@
* Signature: $context->set_header()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -298,8 +290,6 @@
* Signature: $context->request()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -340,8 +330,6 @@
* Signature: $context->response()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -390,8 +378,6 @@
* Signature: $username = $self->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/POE/Server.pm Mon Apr 1 14:53:08 2013
@@ -631,8 +631,6 @@
* Signature: $self->wait_for_event($event_token)
* Param: $event_token string
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -840,8 +838,6 @@
* Signature: $username = $context->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Context/Server.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context/Server.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/Server.pm Mon Apr 1 14:53:08 2013
@@ -693,8 +693,6 @@
* Signature: $self->wait_for_event($event_token)
* Param: $event_token string
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -888,8 +886,6 @@
* Signature: $username = $context->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/MessageDispatcher.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/MessageDispatcher.pm (original)
+++ p5ee/trunk/App-Context/lib/App/MessageDispatcher.pm Mon Apr 1 14:53:08 2013
@@ -89,9 +89,6 @@
A MessageDispatcher service is a means by which data can be sent synchronously
or asynchronously to a recipient and responses can be received.
- * Throws: App::Exception::MessageDispatcher
- * Since: 0.01
-
=head2 Class Design
...
@@ -136,8 +133,6 @@
* Param: message binary
* Return: $status integer
* Return: $ticket string
- * Throws: App::Exception::MessageDispatcher
- * Since: 0.01
Sample Usage:
@@ -166,8 +161,6 @@
* Param: sender string
* Param: ticket string
* Return: $message binary
- * Throws: App::Exception::MessageDispatcher
- * Since: 0.01
Sample Usage:
@@ -210,7 +203,6 @@
* Signature: $service_type = App::MessageDispatcher->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $mdisp->service_type();
Modified: p5ee/trunk/App-Context/lib/App/Reference.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Reference.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Reference.pm Mon Apr 1 14:53:08 2013
@@ -46,9 +46,6 @@
=head1 Class: App::Reference
- * Throws: App::Exception
- * Since: 0.01
-
=head2 Requirements
The App::Reference class satisfies the following requirements.
@@ -84,8 +81,6 @@
* Param: $array_ref []
* Param: $hash_ref {}
* Return: $ref App::Reference
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -134,8 +129,6 @@
* Signature: $property_value = $ref->get($property_name);
* Param: $property_name string
* Return: $property_value string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -174,8 +167,6 @@
* Signature: $branch = $ref->get_branch($branch_name);
* Param: $branch_name string
* Return: $branch {}
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -258,8 +249,6 @@
* Signature: $ref->get($property_name, $property_value);
* Param: $property_name string
* Param: $property_value string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -307,8 +296,6 @@
* Param: $ref1 {}
* Param: $ref2 {}
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -369,8 +356,6 @@
* Param: $branch_name string
* Param: $ref2 {}
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -391,8 +376,6 @@
* Signature: $perl = $ref->dump();
* Param: void
* Return: $perl text
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -420,8 +403,6 @@
* Signature: $ref->print();
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -464,8 +445,6 @@
* Param: $hashref {}
* Param: $arrayref []
* Return: $ref ref
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -477,7 +456,7 @@
return {} if ($#_ == -1);
if (ref($_[0]) ne "") {
return $_[0] if ($#_ == 0);
- App::Exception->throw(error => "Reference->create(): args supplied with an ARRAY ref\n")
+ die "Reference->create(): args supplied with an ARRAY ref\n"
if (ref($_[0]) eq "ARRAY");
my ($ref, $i);
$ref = shift;
@@ -492,7 +471,7 @@
return [ @_ ];
}
elsif ($#_ % 2 == 0) {
- App::Exception->throw(error => "Reference->create(): Odd number of named parameters\n");
+ die "Reference->create(): Odd number of named parameters\n";
}
return { @_ };
}
@@ -511,8 +490,6 @@
* Signature: _init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Request.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Request.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Request.pm Mon Apr 1 14:53:08 2013
@@ -75,8 +75,6 @@
* Signature: $request = App::Request->new($context, $named);
* Return: $request App::Request
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -126,8 +124,6 @@
* Signature: $request->_init()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -161,8 +157,6 @@
* Signature: $username = $request->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -188,8 +182,6 @@
* Signature: $http_method = $request->http_method();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -215,8 +207,6 @@
* Signature: $content_type = $request->content_type();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -241,8 +231,6 @@
* Signature: $session_id = $request->get_session_id();
* Param: void
* Return: $session_id string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Request/CGI.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Request/CGI.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Request/CGI.pm Mon Apr 1 14:53:08 2013
@@ -65,8 +65,6 @@
* Signature: $request->_init()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -200,8 +198,6 @@
* Signature: $session_id = $request->get_session_id();
* Param: void
* Return: $session_id string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -235,8 +231,6 @@
* Signature: $request->get_events($cgi)
* Param: $cgi (CGI)
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -623,8 +617,6 @@
* Signature: $username = $request->user();
* Param: void
* Return: string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -651,8 +643,6 @@
* Signature: $header_value = $request->header($header_name);
* Param: $header_name string
* Return: $header_value string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/ResourceLocker.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/ResourceLocker.pm (original)
+++ p5ee/trunk/App-Context/lib/App/ResourceLocker.pm Mon Apr 1 14:53:08 2013
@@ -63,9 +63,6 @@
resource locks. These can be used to synchronize access to and modification
of shared resources such as are stored in a SharedDatastore.
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
-
=cut
#############################################################################
@@ -109,8 +106,6 @@
* Param: nonExclusive boolean
* Param: maxWaitTimeMS integer
* Return: $resource_name string
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -150,8 +145,6 @@
* Signature: $srs->unlock($resource_name);
* Param: $resource_name string
* Return: void
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -184,7 +177,6 @@
* Signature: $service_type = App::ResourceLocker->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $rlock->service_type();
Modified: p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCLocker.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCLocker.pm (original)
+++ p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCLocker.pm Mon Apr 1 14:53:08 2013
@@ -47,9 +47,6 @@
resource locks. These can be used to synchronize access to and modification
of shared resources such as are stored in a SharedDatastore.
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
-
The ResourceLocker may be configured with the following parameters, which govern
all locks accessed in the ResourceLocker (as per IPC::Locker).
@@ -114,8 +111,6 @@
* Param: nonExclusive boolean
* Param: maxWaitTimeMS integer
* Return: $resource_name string
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -214,8 +209,6 @@
* Signature: $srs->unlock($resource_name);
* Param: $resource_name string
* Return: void
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCSemaphore.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCSemaphore.pm (original)
+++ p5ee/trunk/App-Context/lib/App/ResourceLocker/IPCSemaphore.pm Mon Apr 1 14:53:08 2013
@@ -49,9 +49,6 @@
These can be used to synchronize access to and modification
of shared resources such as are stored in a SharedDatastore.
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
-
Generally speaking, this module only works on Unix platforms, because they
support the System V semaphore API on which the IPC::Semaphore module
is built.
@@ -120,8 +117,6 @@
* Param: nonExclusive boolean
* Param: maxWaitTimeMS integer
* Return: $resource_name string
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -186,8 +181,6 @@
* Signature: $srs->unlock($resource_name);
* Param: $resource_name string
* Return: void
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -224,8 +217,6 @@
* Signature: $self->_init();
* Param: void
* Return: void
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -255,8 +246,6 @@
* Param: $resource_name string
* Return: $semset IPC::Semaphore
* Return: $semnum integer
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
@@ -328,8 +317,6 @@
* Signature: $self->free($resource_name);
* Param: $resource_name string
* Return: void
- * Throws: App::Exception::ResourceLocker
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Response.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Response.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Response.pm Mon Apr 1 14:53:08 2013
@@ -75,8 +75,6 @@
* Signature: $response = App::Response->new(%named);
* Return: $response App::Response
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -126,8 +124,6 @@
* Signature: $response->_init()
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -161,8 +157,6 @@
* Signature: $response->content_type($content_type);
* Param: $content_type string
* Return: $content_type string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -192,8 +186,6 @@
* Signature: $response->content($content);
* Param: $content any
* Return: $content any
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Serializer.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer.pm Mon Apr 1 14:53:08 2013
@@ -91,9 +91,6 @@
(This behavior is overridden with customized serialization techniques
by the derived subclasses.)
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Class Design
The class is entirely made up of static (class) methods.
@@ -138,8 +135,6 @@
* Signature: $serialized_data = $serializer->serialize($data);
* Param: $data ref
* Return: $serialized_data binary
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -172,8 +167,6 @@
* Signature: $serialized_data = App::Serializer->deserialize($data);
* Param: $data ref
* Return: $serialized_data binary
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -207,9 +200,7 @@
if ($serializer_class) {
eval "use $serializer_class;";
if ($@) {
- App::Exception::Serializer->throw(
- error => "create(): error loading $serializer_class serializer class\n"
- );
+ die "create(): error loading $serializer_class serializer class\n";
}
$data = $serializer_class->deserialize($serialized_data);
}
@@ -236,8 +227,6 @@
* Signature: $serialized_content_type = $service->serialized_content_type();
* Param: void
* Return: $serialized_content_type string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -258,8 +247,6 @@
* Signature: $perl = $serializer->dump($data);
* Param: $data ref
* Return: $perl text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -297,7 +284,6 @@
* Signature: $service_type = App::Serializer->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $serializer->service_type();
Modified: p5ee/trunk/App-Context/lib/App/Serializer/Ini.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/Ini.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/Ini.pm Mon Apr 1 14:53:08 2013
@@ -54,9 +54,6 @@
=head1 Class: App::Serializer::Ini
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Design
The class is entirely made up of static (class) methods.
@@ -101,8 +98,6 @@
* Signature: $inidata = $serializer->serialize($data);
* Param: $data ref
* Return: $inidata text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -172,8 +167,6 @@
* Signature: $data = App::Serializer->deserialize($inidata);
* Param: $data ref
* Return: $inidata text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Serializer/Properties.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/Properties.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/Properties.pm Mon Apr 1 14:53:08 2013
@@ -54,9 +54,6 @@
=head1 Class: App::Serializer::Properties
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Design
The class is entirely made up of static (class) methods.
@@ -101,8 +98,6 @@
* Signature: $propdata = $serializer->serialize($data);
* Param: $data ref
* Return: $propdata text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -166,8 +161,6 @@
* Signature: $data = App::Serializer->deserialize($propdata);
* Param: $data ref
* Return: $propdata text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Serializer/Storable.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/Storable.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/Storable.pm Mon Apr 1 14:53:08 2013
@@ -52,9 +52,6 @@
=head1 Class: App::Serializer::Storable
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Design
The class is entirely made up of static (class) methods.
@@ -99,8 +96,6 @@
* Signature: $stor = $serializer->serialize($data);
* Param: $data ref
* Return: $stor binary
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -139,8 +134,6 @@
* Signature: $data = App::Serializer->deserialize($stor);
* Param: $data ref
* Return: $stor binary
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -170,8 +163,6 @@
* Signature: $serialized_content_type = $service->serialized_content_type();
* Param: void
* Return: $serialized_content_type string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Serializer/TextArray.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/TextArray.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/TextArray.pm Mon Apr 1 14:53:08 2013
@@ -52,9 +52,6 @@
=head1 Class: App::Serializer::TextArray
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Design
The class is entirely made up of static (class) methods.
@@ -99,8 +96,6 @@
* Signature: $text = $serializer->serialize(@data);
* Param: @data any
* Return: $text text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -138,8 +133,6 @@
* Signature: @data = App::Serializer->deserialize($text);
* Param: $text text
* Return: @data any
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -173,8 +166,6 @@
* Signature: $serialized_content_type = $service->serialized_content_type();
* Param: void
* Return: $serialized_content_type string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Serializer/Xml.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/Xml.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/Xml.pm Mon Apr 1 14:53:08 2013
@@ -52,9 +52,6 @@
=head1 Class: App::Serializer::Xml
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Design
The class is entirely made up of static (class) methods.
@@ -99,8 +96,6 @@
* Signature: $xml = $serializer->serialize($data);
* Param: $data ref
* Return: $xml text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -145,8 +140,6 @@
* Signature: $data = App::Serializer->deserialize($xml);
* Param: $data ref
* Return: $xml text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -183,8 +176,6 @@
* Signature: $serialized_content_type = $service->serialized_content_type();
* Param: void
* Return: $serialized_content_type string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Serializer/Yaml.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/Yaml.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/Yaml.pm Mon Apr 1 14:53:08 2013
@@ -52,9 +52,6 @@
=head1 Class: App::Serializer::Yaml
- * Throws: App::Exception::Serializer
- * Since: 0.01
-
=head2 Design
The class is entirely made up of static (class) methods.
@@ -99,8 +96,6 @@
* Signature: $yaml = $serializer->serialize(@data);
* Param: @data any
* Return: $yaml text
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -142,8 +137,6 @@
* Signature: @data = App::Serializer->deserialize($yaml);
* Param: $yaml text
* Return: @data any
- * Throws: App::Exception::Serializer
- * Since: 0.01
Sample Usage:
@@ -175,8 +168,6 @@
* Signature: $serialized_content_type = $service->serialized_content_type();
* Param: void
* Return: $serialized_content_type string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Service.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Service.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Service.pm Mon Apr 1 14:53:08 2013
@@ -28,9 +28,6 @@
The App::Service class is a base class for all App-Context services.
- * Throws: App::Exception
- * Since: 0.01
-
=cut
#############################################################################
@@ -53,8 +50,6 @@
* Signature: $service = App::Service->new(%named)
* Return: $service App::Service
- * Throws: App::Exception
- * Since: 0.01
Sample Usage: (never used because this is a base class, but the
constructors of all services follow these rules)
@@ -105,7 +100,6 @@
* Signature: $service_type = App::Service->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $service->service_type();
@@ -122,8 +116,6 @@
* Signature: $content = $self->content();
* Param: void
* Return: $content any
- * Throws: App::Exception
- * Since: 0.01
$content = $so->content();
if (ref($content)) {
@@ -153,8 +145,6 @@
* Signature: $content_type = $service->content_type();
* Param: void
* Return: $content_type string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -178,8 +168,6 @@
* Signature: $content_description = $service->content_description();
* Param: void
* Return: $content_description string
- * Throws: App::Exception
- * Since: 0.01
Provide a description of the content which is useful for diagnostic purposes
(such as for the timing log implemented in App::Context::HTTP).
@@ -212,8 +200,6 @@
* Signature: $guts = $self->internals();
* Param: void
* Return: $guts {}
- * Throws: App::Exception
- * Since: 0.01
$guts = $so->internals();
App::Reference->print($guts);
@@ -245,8 +231,6 @@
* Signature: $perl = $service->dump();
* Param: void
* Return: $perl text
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -315,8 +299,6 @@
* Signature: $service->print();
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -340,8 +322,6 @@
* Param: $target HASH,string
* Param: $values HASH
* Return: $result string
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -481,8 +461,6 @@
* Signature: _init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Session.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Session.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Session.pm Mon Apr 1 14:53:08 2013
@@ -112,8 +112,6 @@
* Param: $array_ref []
* Param: $hash_ref {}
* Return: $session App::Session
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -158,8 +156,6 @@
* Signature: _init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -199,8 +195,6 @@
* Param: $default any
* Param: $setdefault boolean
* Return: $value string,ref
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -302,8 +296,6 @@
* Param: $var string
* Param: $value string,ref
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -398,8 +390,6 @@
* Param: $var string
* Param: $value string,ref
* Return: $value string,ref
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -428,8 +418,6 @@
* Param: $name string
* Param: $attribute string
* Return: void
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -529,8 +517,6 @@
* Signature: $session_id = $session->get_session_id();
* Param: void
* Return: $session_id string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -561,8 +547,6 @@
* Signature: $session_id = $session->new_session_id();
* Param: void
* Return: $session_id string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -594,8 +578,6 @@
* Signature: $html = $session->html();
* Param: void
* Return: $html string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -631,8 +613,6 @@
* Signature: $perl = $session->dump();
* Param: void
* Return: $perl text
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Session/Cookie.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Session/Cookie.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Session/Cookie.pm Mon Apr 1 14:53:08 2013
@@ -122,8 +122,6 @@
* Signature: $session_id = $session->get_session_id();
* Param: void
* Return: $session_id string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -152,8 +150,6 @@
* Signature: $html = $session->html();
* Param: void
* Return: $html string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -244,8 +240,6 @@
* Signature: $ref = App::Reference->create($hashref)
* Param: $hashref {}
* Return: $ref ref
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -272,8 +266,6 @@
* Signature: _init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/Session/HTMLHidden.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Session/HTMLHidden.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Session/HTMLHidden.pm Mon Apr 1 14:53:08 2013
@@ -105,8 +105,6 @@
* Signature: $session_id = $session->get_session_id();
* Param: void
* Return: $session_id string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -135,8 +133,6 @@
* Signature: $html = $session->html();
* Param: void
* Return: $html string
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -238,8 +234,6 @@
* Signature: _init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/SessionObject.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/SessionObject.pm (original)
+++ p5ee/trunk/App-Context/lib/App/SessionObject.pm Mon Apr 1 14:53:08 2013
@@ -112,9 +112,6 @@
without having to worry about its lifecycle (i.e. persistence,
saving and restoring state, etc.) or its location (local or remote).
- * Throws: App::Exception::SessionObject
- * Since: 0.01
-
=cut
#############################################################################
@@ -151,8 +148,6 @@
* Signature: _init($named)
* Param: $named {} [in]
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -201,8 +196,6 @@
=head2 shutdown()
* Signature: $self->shutdown();
- * Throws: App::Exception
- * Since: 0.01
$session_object->shutdown();
@@ -227,8 +220,6 @@
* Signature: $self->container();
* Signature: $self->container($name);
* Params: $name string
- * Throws: App::Exception
- * Since: 0.01
$container = $session_object->container();
@@ -259,8 +250,6 @@
* Signature: $attrib = $self->container_attrib($name);
* Params: $name string
* Returns: $attrib string
- * Throws: App::Exception
- * Since: 0.01
$attrib = $session_object->container_attrib();
@@ -292,8 +281,6 @@
* Param: $event string
* Param: @args any
* Return: $handled boolean
- * Throws: App::Exception
- * Since: 0.01
$handled = $session_object->handle_event("app.table.sort","click","up",4,20);
$handled = $session_object->handle_event("app.table","sort","down","last_name");
@@ -346,8 +333,6 @@
* Signature: $self->set_value($value);
* Param: $value any
* Return: void
- * Throws: App::Exception
- * Since: 0.01
$session_object->set_value("hello");
$session_object->set_value(43);
@@ -381,8 +366,6 @@
* Signature: $value = $self->get_value();
* Param: void
* Return: $value any
- * Throws: App::Exception
- * Since: 0.01
$value = $session_object->get_value();
@@ -412,8 +395,6 @@
* Signature: $formatted_value = $self->fget_value($format);
* Param: $format string
* Return: $formatted_value scalar
- * Throws: App::Exception
- * Since: 0.01
$formatted_date = $date_session_object->fget_value(); # use default format
$formatted_date = $date_session_object->fget_value("%Y-%m-%d"); # supply format
@@ -451,8 +432,6 @@
* Param: $default any
* Param: $setdefault boolean
* Return: $values []
- * Throws: App::Exception
- * Since: 0.01
$values = $session_object->get_values();
@@ -486,8 +465,6 @@
* Param: $attribute string
* Param: $value any
* Return: void
- * Throws: App::Exception
- * Since: 0.01
$session_object->set("last_name","Jones");
@@ -518,8 +495,6 @@
* Param: $default any
* Param: $setdefault boolean
* Return: $value any
- * Throws: App::Exception
- * Since: 0.01
$last_name = $session_object->get("last_name");
$is_adult = $session_object->get("adult_ind","Y"); # assume adult
@@ -550,8 +525,6 @@
* Signature: $self->delete($attribute);
* Param: $attribute string
* Return: void
- * Throws: App::Exception
- * Since: 0.01
$session_object->delete("voter_id");
@@ -582,8 +555,6 @@
* Param: $attribute string
* Param: $default any
* Return: void
- * Throws: App::Exception
- * Since: 0.01
$session_object->set_default("adult_ind","Y");
@@ -622,8 +593,6 @@
* Param: $event string
* Param: @args any
* Return: $handled boolean
- * Throws: App::Exception
- * Since: 0.01
print $w->label(); # "Allez!" (if current lang is "fr")
print $w->label("name"); # "Jacques" (translation of alternate attribute) (if curr lang is "fr")
@@ -663,8 +632,6 @@
* Param: void
* Return: $values []
* Return: $labels {}
- * Throws: App::Exception
- * Since: 0.01
($values, $labels) = $gender_session_object->values_labels();
# $values = [ "M", "F" ];
@@ -710,8 +677,6 @@
* Param: $attribute string
* Param: $lang string
* Return: $labels {}
- * Throws: App::Exception
- * Since: 0.01
$labels = $w->labels();
$labels = $w->labels("names");
@@ -753,8 +718,6 @@
* Signature: $self->print();
* Param: void
* Return: void
- * Throws: App::Exception
- * Since: 0.01
$w->print();
@@ -786,8 +749,6 @@
* Param: $type string
* Param: $format string
* Return: $formatted_value string
- * Throws: App::Exception
- * Since: 0.01
$formatted_value = $session_object->format("20020127","date","%Y-%m-%d");
$formatted_value = $session_object->format("27-Jan-02","date","%Y-%m-%d");
@@ -820,8 +781,6 @@
* Param: $label string
* Param: $lang string
* Return: $translated_label string
- * Throws: App::Exception
- * Since: 0.01
$translated_label = $session_object->translate($label, $lang);
print $w->translate("Hello","fr"); # "Bonjour"
@@ -885,7 +844,6 @@
* Signature: $service_type = App::SessionObject->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $session_object->service_type();
@@ -907,8 +865,6 @@
* Signature: $attribs = App::Service->absorbable_attribs()
* Param: void
* Return: $attribs []
- * Throws: App::Exception
- * Since: 0.01
$attribs = $session_object->absorbable_attribs();
@attribs = @{$session_object->absorbable_attribs()};
Modified: p5ee/trunk/App-Context/lib/App/UserAgent.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/UserAgent.pm (original)
+++ p5ee/trunk/App-Context/lib/App/UserAgent.pm Mon Apr 1 14:53:08 2013
@@ -60,8 +60,6 @@
* Signature: $user_agent = App::UserAgent->new();
* Param: $context App::Context
* Return: $user_agent App::UserAgent
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -128,8 +126,6 @@
* Signature: $bool = $self->supports($capability);
* Param: $capability string
* Return: $bool boolean
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -218,8 +214,6 @@
* Signature: $bool = $self->parse($http_user_agent);
* Param: $http_user_agent string
* Return: $bool boolean
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -262,8 +256,6 @@
* Signature: $bool = $self->parse($http_user_agent);
* Param: $http_user_agent string
* Return: $bool boolean
- * Throws: <none>
- * Since: 0.01
Sample Usage:
@@ -403,8 +395,6 @@
* Param: $arch string
* Param: $lang string
* Return: $support_matrix {}
- * Throws: <none>
- * Since: 0.01
Sample Usage:
Modified: p5ee/trunk/App-Context/lib/App/ValueDomain.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/ValueDomain.pm (original)
+++ p5ee/trunk/App-Context/lib/App/ValueDomain.pm Mon Apr 1 14:53:08 2013
@@ -60,9 +60,6 @@
A ValueDomain service represents an array of values and the labels by which
those values may be displayed.
- * Throws: App::Exception::ValueDomain
- * Since: 0.01
-
=cut
#############################################################################
@@ -83,8 +80,6 @@
* Signature: $values = $dom->values($values_string);
* Param: $values_string string
* Return: $values HASH
- * Throws: App::Exception::ValueDomain
- * Since: 0.01
Sample Usage:
@@ -113,8 +108,6 @@
* Signature: $labels = $dom->labels($values_string);
* Param: $values_string string
* Return: $labels HASH
- * Throws: App::Exception::ValueDomain
- * Since: 0.01
Sample Usage:
@@ -144,8 +137,6 @@
* Param: $values_string string
* Return: $values HASH
* Return: $labels HASH
- * Throws: App::Exception::ValueDomain
- * Since: 0.01
Sample Usage:
@@ -215,8 +206,6 @@
* Signature: $self->load($values_string)
* Param: $values_string string
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -312,8 +301,6 @@
* Signature: $self->_load($values_string)
* Param: $values_string string
* Return: void
- * Throws: App::Exception
- * Since: 0.01
Sample Usage:
@@ -376,7 +363,6 @@
* Signature: $service_type = App::ValueDomain->service_type();
* Param: void
* Return: $service_type string
- * Since: 0.01
$service_type = $sdata->service_type();
Modified: p5ee/trunk/App-Context/lib/App/devguide.pod
==============================================================================
--- p5ee/trunk/App-Context/lib/App/devguide.pod (original)
+++ p5ee/trunk/App-Context/lib/App/devguide.pod Mon Apr 1 14:53:08 2013
@@ -168,24 +168,6 @@
Next, the App module is included, which does the following:
* disable "Use of uninitialized value" warnings
- * use Exception::Class; # enable Exception inheritance
- * use App::Exceptions; # define App exceptions
-
-The base class of all App exceptions is "App::Exception".
-Derived from this base exception, each component service of App
-has its own base class as follows.
-
- App::Exception::Context
- App::Exception::Config
- App::Exception::Serializer
- App::Exception::Repository
- App::Exception::Security
- App::Exception::Session
- App::Exception::Widget
- App::Exception::TemplateEngine
- App::Exception::Procedure
- App::Exception::Messaging
- App::Exception::LogChannel
=head2 cgi-bin/app and bootstrapping the environment
Modified: p5ee/trunk/App-Context/lib/App/quickstart.pod
==============================================================================
--- p5ee/trunk/App-Context/lib/App/quickstart.pod (original)
+++ p5ee/trunk/App-Context/lib/App/quickstart.pod Mon Apr 1 14:53:08 2013
@@ -92,8 +92,6 @@
=item * +-- L<App::Context::NetServer> - Another flavor of server context (not yet implemented).
-=item * L<App::Exceptions> - Defines the exceptions used in the framework.
-
=item * L<App::UserAgent>
=item * L<App::Request>
-
[svn:p5ee] r15614 - in p5ee/trunk/App-Context: . lib lib/App lib/App/Authentication lib/App/CallDispatcher lib/App/Conf lib/App/Context lib/App/Context/POE lib/App/Request lib/App/ResourceLocker lib/App/Serializer lib/App/Session
by spadkins