|
version 1.3, 2012/07/30 01:37:22
|
version 1.4, 2013/12/05 16:58:45
|
|
Line 36 my $osmsg = "\n**** WARNING: You seem to
|
Line 36 my $osmsg = "\n**** WARNING: You seem to
|
| |
|
| if ('<DIST />' eq 'sles9' || '<DIST />' eq 'sles10' || '<DIST />' eq 'sles11' || |
if ('<DIST />' eq 'sles9' || '<DIST />' eq 'sles10' || '<DIST />' eq 'sles11' || |
| '<DIST />' eq 'suse11.1' || '<DIST />' eq 'suse11.2' || '<DIST />' eq 'suse11.3' || |
'<DIST />' eq 'suse11.1' || '<DIST />' eq 'suse11.2' || '<DIST />' eq 'suse11.3' || |
| '<DIST />' eq 'suse11.4' || '<DIST />' eq '12.1') { |
'<DIST />' eq 'suse11.4' || '<DIST />' eq 'suse12.1' || '<DIST />' eq 'suse12.2' || |
| |
'<DIST />' eq 'suse12.3' || '<DIST />' eq 'suse13.1') { |
| if (open(PIPE,"cat /etc/sysconfig/language |grep '^RC_LANG' |")) { |
if (open(PIPE,"cat /etc/sysconfig/language |grep '^RC_LANG' |")) { |
| print "Checking OS language"; |
print "Checking OS language"; |
| if (<PIPE> =~ /^RC_LANG="en/) { |
if (<PIPE> =~ /^RC_LANG="en/) { |
|
Line 48 if ('<DIST />' eq 'sles9' || '<DIST />'
|
Line 49 if ('<DIST />' eq 'sles9' || '<DIST />'
|
| close(PIPE); |
close(PIPE); |
| } |
} |
| } elsif ('<DIST />' eq 'debian5' || '<DIST />' eq 'debian6' || '<DIST />' eq 'ubuntu6' || |
} elsif ('<DIST />' eq 'debian5' || '<DIST />' eq 'debian6' || '<DIST />' eq 'ubuntu6' || |
| '<DIST />' eq 'ubuntu8' || '<DIST />' eq 'ubuntu10' || '<DIST />' eq 'ubuntu12') { |
'<DIST />' eq 'ubuntu8' || '<DIST />' eq 'ubuntu10' || '<DIST />' eq 'ubuntu12' || |
| |
'<DIST />' eq 'fedora18' || '<DIST />' eq 'fedora19' || '<DIST />' eq 'fedora20') { |
| if (open(PIPE,"cat /etc/default/locale |grep '^LANG' |")) { |
if (open(PIPE,"cat /etc/default/locale |grep '^LANG' |")) { |
| print "Checking OS language"; |
print "Checking OS language"; |
| if (<PIPE> =~ /^LANG="en/) { |
if (<PIPE> =~ /^LANG="en/) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to langcheck.piml CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / doc / loncapafiles