[BACK]Return to install.pl CVS log [TXT] [DIR] Up to [LON-CAPA] / doc / install / linux

Diff for /doc/install/linux/install.pl between versions 1.10 and 1.11

version 1.10, 2011/04/24 22:44:50 version 1.11, 2011/05/05 16:38:07
Line 195  sub get_distro { Line 195  sub get_distro {
             $distro = 'centos'.$1;              $distro = 'centos'.$1;
             $updatecmd = 'yum install LONCAPA-prerequisites';              $updatecmd = 'yum install LONCAPA-prerequisites';
             $installnow = 'yum -y install LONCAPA-prerequisites';              $installnow = 'yum -y install LONCAPA-prerequisites';
         } elsif ($versionstring =~ /Scientific Linux SL release ([\d.]+) /) {          } elsif ($versionstring =~ /Scientific Linux (SL )?release ([\d.]+) /) {
             my $ver = $1;              my $ver = $1;
             $ver =~ s/\.\d+$//;              $ver =~ s/\.\d+$//;
             $distro = 'scientific'.$ver;              $distro = 'scientific'.$ver;
Line 490  sub chkconfig { Line 490  sub chkconfig {
     my $nrlstr = join('',@norunlevels);      my $nrlstr = join('',@norunlevels);
     foreach my $type ('apache','mysql','ntp','cups','memcached') {      foreach my $type ('apache','mysql','ntp','cups','memcached') {
         my $service = $daemon{$type};          my $service = $daemon{$type};
         my $command = $checker_bin.' --list '.$service;          my $command = $checker_bin.' --list '.$service.' 2>/dev/null';
         if ($type eq 'cups') {           if ($type eq 'cups') { 
             if ($distro =~ /^(?:debian|ubuntu)(\d+)/) {              if ($distro =~ /^(?:debian|ubuntu)(\d+)/) {
                 my $version = $1;                  my $version = $1;
                 if (($distro =~ /^ubuntu/) && ($version <= 8)) {                  if (($distro =~ /^ubuntu/) && ($version <= 8)) {
                     $command = $checker_bin.' --list cupsys';                      $command = $checker_bin.' --list cupsys 2>/dev/null';
                 }                  }
             }              }
         }          }
Line 1264  if ($callsub{'runlevels'}) { Line 1264  if ($callsub{'runlevels'}) {
             }                }  
         }          }
     }      }
     &update_SuSEfirewall2_setup($instdir);      if ($distro =~ /^(suse|sles)/) {
           &update_SuSEfirewall2_setup($instdir);
       }
 } else {  } else {
     &print_and_log(&mt('Skipping setting override for start-up order of services.')."\n");      &print_and_log(&mt('Skipping setting override for start-up order of services.')."\n");
 }  }
Line 1290  if ($callsub{'firewall'}) { Line 1292  if ($callsub{'firewall'}) {
                 }                  }
             }              }
         }          }
       } elsif ($distro =~ /^scientific/) {
           print &mt('Use [_1] to configure the firewall to allow access for [_2].',
                     'system-config-firewall-tui -- Customize',
                     'ssh, http')."\n";
     } else {      } else {
         print &mt('Use [_1] to configure the firewall to allow access for [_2].',          print &mt('Use [_1] to configure the firewall to allow access for [_2].',
                   'setup -- Firewall confiuration -> Customize',                    'setup -- Firewall configuration -> Customize',
                   'ssh, http, https')."\n";                    'ssh, http, https')."\n";
     }      }
 } else {  } else {
Line 1504  sub kill_extra_services { Line 1510  sub kill_extra_services {
                             if (($distro =~ /^ubuntu/) && ($version <= 8)) {                              if (($distro =~ /^ubuntu/) && ($version <= 8)) {
                                 $daemon = 'cupsys';                                  $daemon = 'cupsys';
                             }                              }
                         } elsif ($distro =~ /^(?:suse|sles)/) {                          } elsif ($distro =~ /^(?:suse|sles|scientific)/) {
                             $daemon = 'cups';                              $daemon = 'cups';
                         }                          }
                     }                      }
Line 1664  sub copy_httpd_conf { Line 1670  sub copy_httpd_conf {
     print_and_log(&mt('Copying the LON-CAPA [_1] to [_2].',"'httpd.conf'",      print_and_log(&mt('Copying the LON-CAPA [_1] to [_2].',"'httpd.conf'",
                   "'/etc/httpd/conf/httpd.conf'")."\n");                    "'/etc/httpd/conf/httpd.conf'")."\n");
     copy "/etc/httpd/conf/httpd.conf","/etc/httpd/conf/httpd.conf.original";      copy "/etc/httpd/conf/httpd.conf","/etc/httpd/conf/httpd.conf.original";
     copy "$instdir/httpd.conf","/etc/httpd/conf/httpd.conf";      copy "$instdir/centos-rhes-fedora-sl/httpd.conf","/etc/httpd/conf/httpd.conf";
     chmod(0444,"/etc/httpd/conf/httpd.conf");      chmod(0444,"/etc/httpd/conf/httpd.conf");
     print_and_log("\n");      print_and_log("\n");
 }  }
Removed from v.1.10  
changed lines
  Added in v.1.11

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>