loncom/build/distprobe - diff

Return to distprobe CVS log

Up to [LON-CAPA] / loncom / build

version 1.1, 2002/04/21 16:44:29	version 1.4, 2003/07/01 17:55:12
Line 1	Line 1
#!/usr/bin/perl	#!/usr/bin/perl

# YEAR=2002	# YEAR=2002
# 4/21 Scott Harrison

my $dist='default';	my $dist='default';
if (-e '/etc/redhat-release') {	if (-e '/etc/redhat-release') {
Line 12 if (-e '/etc/redhat-release') {	Line 11 if (-e '/etc/redhat-release') {
my $version=(split(/\s+/,$versionstring))[4];	my $version=(split(/\s+/,$versionstring))[4];
if ($version=~/^7\./) {	if ($version=~/^7\./) {
$dist='redhat7';	$dist='redhat7';
	} elsif ($version=~/^8\./) {
	$dist='redhat8';
	} elsif ($version=~/^9/) {
	$dist='redhat9';
}	}
}	}
elsif (-e '/etc/debian_version') {	elsif (-e '/etc/debian_version') {