r3892 - trunk/varnish-tools/webgui/Varnish

[petter at projects.linpro.no]

Author: petter
Date: 2009-03-06 09:28:56 +0100 (Fri, 06 Mar 2009)
New Revision: 3892

Modified:
   trunk/varnish-tools/webgui/Varnish/DB.pm
Log:
Fixed a seg.fault. on RHEL4 triggered by selectall_hashref(), for unknown reasons.


Modified: trunk/varnish-tools/webgui/Varnish/DB.pm
===================================================================
--- trunk/varnish-tools/webgui/Varnish/DB.pm	2009-03-06 07:58:07 UTC (rev 3891)
+++ trunk/varnish-tools/webgui/Varnish/DB.pm	2009-03-06 08:28:56 UTC (rev 3892)
@@ -322,8 +322,17 @@
 
 	sub get_parameter_info {
 		my ($self) = @_;
+		
+		my $sql = "SELECT name, unit, description FROM parameter_info";
+		my $sth = $dbh->prepare($sql);
+		$sth->execute();
+		my %parameter_info;
+		while (my $info_ref = $sth->fetchrow_arrayref()) {
+			$parameter_info{$info_ref->[0]} = 
+				{unit => $info_ref->[1], description => $info_ref->[2]} ;
+		}
 
-		return $dbh->selectall_hashref("SELECT * FROM parameter_info", 1);
+		return \%parameter_info;
 	}
 
 	sub get_vcl_infos {