--- loncom/build/make_domain_coordinator.pl 2012/12/18 13:05:41 1.24 +++ loncom/build/make_domain_coordinator.pl 2013/12/20 21:13:02 1.26 @@ -11,7 +11,7 @@ make_domain_coordinator.pl - Make a doma # The LearningOnline Network # make_domain_coordinator.pl - Make a domain coordinator on a system # -# $Id: make_domain_coordinator.pl,v 1.24 2012/12/18 13:05:41 raeburn Exp $ +# $Id: make_domain_coordinator.pl,v 1.26 2013/12/20 21:13:02 raeburn Exp $ # # This file is part of the LearningOnline Network with CAPA (LON-CAPA). # @@ -360,12 +360,19 @@ if ($pbad) { "\n"); } -my $distro; +my ($distro,$nostdin); if (open(PIPE,"perl distprobe|")) { $distro = ; close(PIPE); } if ($distro =~ /^ubuntu|debian/) { + $nostdin = 1; +} elsif ($distro =~ /^suse([\d.]+)$/) { + if ($1 > 12.2) { + $nostdin = 1; + } +} +if ($nostdin) { open(OUT,"|usermod -p `mkpasswd $passwd` $username"); close(OUT); } else {