[MOBY-guts] biomoby commit
Eddie Kawas
kawas at dev.open-bio.org
Thu Nov 6 18:32:34 UTC 2008
kawas
Thu Nov 6 13:32:33 EST 2008
Update of /home/repository/moby/moby-live/Perl/MOSES-MOBY/lib/MOSES/MOBY
In directory dev.open-bio.org:/tmp/cvs-serv25509/Perl/MOSES-MOBY/lib/MOSES/MOBY
Modified Files:
Base.pm
Log Message:
bug fixes:
* swapped IO::Scalar with IO::String for performance reasons (still searching for better method)
* applied patch to Utils.pm (thanks to Kenny Billiau)
* MOSES::MOBY::Cache::Registries no longer does a file read each time a new Registries object is instantiated.
moby-live/Perl/MOSES-MOBY/lib/MOSES/MOBY Base.pm,1.5,1.6
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOSES-MOBY/lib/MOSES/MOBY/Base.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- /home/repository/moby/moby-live/Perl/MOSES-MOBY/lib/MOSES/MOBY/Base.pm 2008/10/30 21:26:38 1.5
+++ /home/repository/moby/moby-live/Perl/MOSES-MOBY/lib/MOSES/MOBY/Base.pm 2008/11/06 18:32:33 1.6
@@ -632,14 +632,14 @@
my $DUMPER;
BEGIN {
use Dumpvalue;
- use IO::Scalar;
+ use IO::String;
$DUMPER = Dumpvalue->new();
# $DUMPER->set (veryCompact => 1);
}
sub as_string {
my $self = shift;
my $dump_str;
- my $io = IO::Scalar->new (\$dump_str);
+ my $io = IO::String->new (\$dump_str);
my $oio = select ($io);
$DUMPER->dumpValue (\$self);
select ($oio);
More information about the MOBY-guts
mailing list