cvsuser 04/02/27 06:06:50
Modified: App-Context/bin app-apache app
App-Context/cgi-bin app
Log:
updated to use new App::Options syntax
Revision Changes Path
1.2 +2 -5 p5ee/App-Context/bin/app-apache
Index: app-apache
===================================================================
RCS file: /cvs/public/p5ee/App-Context/bin/app-apache,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -w -r1.1 -r1.2
--- app-apache 3 Dec 2003 16:24:55 -0000 1.1
+++ app-apache 27 Feb 2004 14:06:50 -0000 1.2
@@ -1,7 +1,7 @@
#!/usr/local/bin/perl
#############################################################################
-# $Id: app-apache,v 1.1 2003/12/03 16:24:55 spadkins Exp $
+# $Id: app-apache,v 1.2 2004/02/27 14:06:50 spadkins Exp $
#############################################################################
# The exit codes returned are:
@@ -18,10 +18,7 @@
# When multiple arguments are given, only the error from the _last_
# one is reported. Run "apachectl help" for usage info
-BEGIN {
use App::Options;
- App::Options->init();
-}
use strict;
1.7 +3 -11 p5ee/App-Context/bin/app
Index: app
===================================================================
RCS file: /cvs/public/p5ee/App-Context/bin/app,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -r1.6 -r1.7
--- app 3 Dec 2003 16:12:57 -0000 1.6
+++ app 27 Feb 2004 14:06:50 -0000 1.7
@@ -1,20 +1,12 @@
#!/usr/local/bin/perl -w
-# NOTE: -T option ignores PERL5LIB
+# NOTE: -T option would ignore PERL5LIB
#############################################################################
-# $Id: app,v 1.6 2003/12/03 16:12:57 spadkins Exp $
+# $Id: app,v 1.7 2004/02/27 14:06:50 spadkins Exp $
#############################################################################
-BEGIN {
use App::Options;
- App::Options->init();
-}
-
-#################################################################
-# NOTE: some Context classes (e.g. Context::CGI) also read in
-# the environment and store it in the %App::options.
-#################################################################
use App;
my $context = App->context(\%App::options);
$context->dispatch_events();
1.2 +3 -11 p5ee/App-Context/cgi-bin/app
Index: app
===================================================================
RCS file: /cvs/public/p5ee/App-Context/cgi-bin/app,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -w -r1.1 -r1.2
--- app 3 Dec 2003 16:13:36 -0000 1.1
+++ app 27 Feb 2004 14:06:50 -0000 1.2
@@ -1,20 +1,12 @@
#!/usr/local/bin/perl -w
-# NOTE: -T option ignores PERL5LIB
+# NOTE: -T option would ignore PERL5LIB
#############################################################################
-# $Id: app,v 1.1 2003/12/03 16:13:36 spadkins Exp $
+# $Id: app,v 1.2 2004/02/27 14:06:50 spadkins Exp $
#############################################################################
-BEGIN {
use App::Options;
- App::Options->init();
-}
-
-#################################################################
-# NOTE: some Context classes (e.g. Context::CGI) also read in
-# the environment and store it in the %App::options.
-#################################################################
use App;
my $context = App->context(\%App::options);
$context->dispatch_events();
