--- loncom/build/distprobe 2004/10/26 19:45:57 1.6 +++ loncom/build/distprobe 2004/11/01 21:53:23 1.7 @@ -2,7 +2,7 @@ # # The LearningOnline Network with CAPA # -# $Id: distprobe,v 1.6 2004/10/26 19:45:57 albertel Exp $ +# $Id: distprobe,v 1.7 2004/11/01 21:53:23 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -43,7 +43,12 @@ if (-e '/etc/redhat-release') { $dist='redhat9'; } } elsif ($versionstring =~ /Fedora Core release ([\d\.]+) /) { - $dist = 'fedora'.$1; + my $version=$1; + if ($version - int($version) > .9) { + $dist = 'fedora'.(int($version)+1); + } else { + $dist = 'fedora'.int($version); + } } else { warn('Unable to interpret /etc/redhat-release '. 'to determine system type');