cvsuser 04/02/02 14:18:53
Modified: App-Context/lib/App/Conf File.pm
Log:
fixed bug with file deserializer autodetection
Revision Changes Path
1.6 +3 -3 p5ee/App-Context/lib/App/Conf/File.pm
Index: File.pm
===================================================================
RCS file: /cvs/public/p5ee/App-Context/lib/App/Conf/File.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -w -r1.5 -r1.6
--- File.pm 2 Feb 2004 21:34:06 -0000 1.5
+++ File.pm 2 Feb 2004 22:18:53 -0000 1.6
@@ -1,10 +1,10 @@
#############################################################################
-## $Id: File.pm,v 1.5 2004/02/02 21:34:06 spadkins Exp $
+## $Id: File.pm,v 1.6 2004/02/02 22:18:53 spadkins Exp $
#############################################################################
package App::Conf::File;
-$VERSION = do { my @r=(q$Revision: 1.5 $=~/\d+/g); sprintf "%d."."%02d"x$#r,@r};
+$VERSION = do { my @r=(q$Revision: 1.6 $=~/\d+/g); sprintf "%d."."%02d"x$#r,@r};
use App;
use App::Conf;
@@ -103,7 +103,7 @@
# (we really should do this only for text file types)
$text =~ s/\{:([a-zA-Z0-9_]+)(=?)([^:\{\}]*):\}/(defined $options->{$1}
? $options->{$1} : ($2 ? $3 : $1))/eg;
- $serializer_class = $options->{conf_serializer_class} ||
"App::Serializer";
+ $serializer_class = $options->{conf_serializer_class};
if (!$serializer_class) {
if ($conf_type eq "pl") {
