pakfire.cgi: Pass packages to install/uninstall as array

[people/pmueller/ipfire-2.x.git] / html / cgi-bin / mdstat.cgi

diff --git a/html/cgi-bin/mdstat.cgi b/html/cgi-bin/mdstat.cgi
index 35c7debf8ec27a89d1f943602393ea46df250013..9ee2b15a1a1cb8bb5380637c360dd8d5464d5614 100644 (file)
--- a/html/cgi-bin/mdstat.cgi
+++ b/html/cgi-bin/mdstat.cgi
@@ -33,7 +33,7 @@ my %color = ();
 my %mainsettings = ();
 
 &General::readhash("${General::swroot}/main/settings", \%mainsettings);
-&General::readhash("/srv/web/ipfire/html/themes/".$mainsettings{'THEME'}."/include/colors.txt", \%color);
+&General::readhash("/srv/web/ipfire/html/themes/ipfire/include/colors.txt", \%color);
 
 &Header::showhttpheaders();
 &Header::openpage($Lang::tr{'status information'}, 1, '');
@@ -41,8 +41,14 @@ my %mainsettings = ();
 
 &Header::openbox('100%', 'left',"MD Raid State");
 
-print '<textarea rows="25" cols="80" readonly="true">';
-print `cat "/proc/mdstat"`;
+print '<textarea rows="25" cols="80" readonly="readonly">';
+
+# Grab mdstat status.
+open(MDSTAT, "/proc/mdstat");
+my @mdstat = <MDSTAT>;
+close(MDSTAT);
+print "@mdstat";
+
 print '</textarea>';
 
 &Header::closebox();