cvs commit: p5ee/App-Context/lib/App SessionObject.pm
[email protected] (Stephen Adkins)
| Newsgroups | perl.cvs.p5ee |
|---|---|
| Message-ID | <[email protected]> |
cvsuser 04/11/10 07:40:12
Modified: App-Context/lib/App SessionObject.pm
Log:
default cname is default
Revision Changes Path
1.5 +2 -2 p5ee/App-Context/lib/App/SessionObject.pm
Index: SessionObject.pm
===================================================================
RCS file: /cvs/public/p5ee/App-Context/lib/App/SessionObject.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- SessionObject.pm 2 Sep 2004 20:56:51 -0000 1.4
+++ SessionObject.pm 10 Nov 2004 15:40:12 -0000 1.5
@@ -1,6 +1,6 @@
#############################################################################
-## $Id: SessionObject.pm,v 1.4 2004/09/02 20:56:51 spadkins Exp $
+## $Id: SessionObject.pm,v 1.5 2004/11/10 15:40:12 spadkins Exp $
#############################################################################
package App::SessionObject;
@@ -233,7 +233,7 @@
$container = $1;
}
else {
- my $cname = $context->so_get("default","cname");
+ my $cname = $context->so_get("default","cname","default");
if ($cname ne $name && $cname !~ /^$name\./) {
$container = $cname; # container is the current active widget
}