[MOBY-guts] biomoby commit
Mark Wilkinson
mwilkinson at pub.open-bio.org
Tue Aug 24 20:43:33 UTC 2004
mwilkinson
Tue Aug 24 16:43:33 EDT 2004
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory pub.open-bio.org:/tmp/cvs-serv27799/MOBY
Modified Files:
Config.pm
Log Message:
various small tweaks and doc fixes
moby-live/Perl/MOBY Config.pm,1.4,1.5
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Config.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- /home/repository/moby/moby-live/Perl/MOBY/Config.pm 2004/07/09 00:21:53 1.4
+++ /home/repository/moby/moby-live/Perl/MOBY/Config.pm 2004/08/24 20:43:33 1.5
@@ -74,11 +74,11 @@
}
my $file = $ENV{MOBY_CENTRAL_CONFIG};
- (-e $file) || die "can't open MOBY Configuration file $!\n";
+ (-e $file) || die "MOBY Configuration file $file doesn't exist $!\n";
chomp $file;
if ((-e $file) && (!(-d $file))){
- open IN, $file || die "can't open MOBY Configuration file $!\n";
+ open IN, $file || die "can't open MOBY Configuration file $file for unknown reasons$!\n";
}
my @sections = split /(\[\s*\S+\s*\][^\[]*)/s, join "", <IN>;
#print STDERR "split into @sections\n";
More information about the MOBY-guts
mailing list