View | Details | Raw Unified | Return to bug 14521
Collapse All | Expand All

(-)a/admin/systempreferences.pl (-3 / +4 lines)
Lines 70-83 sub StringSearch { Link Here
70
70
71
    my $strsth = "Select variable,value,explanation,type,options from systempreferences where variable in (";
71
    my $strsth = "Select variable,value,explanation,type,options from systempreferences where variable in (";
72
    my $first = 1;
72
    my $first = 1;
73
    my @sql_bind;
73
    for my $name ( get_local_prefs() ) {
74
    for my $name ( get_local_prefs() ) {
74
                $strsth .= ',' unless $first;
75
                $strsth .= ',' unless $first;
75
                $strsth .= "'$name'";
76
                $strsth .= "?";
77
                push(@sql_bind,$name);
76
                $first = 0;
78
                $first = 0;
77
    }
79
    }
78
    $strsth .= ") order by variable";
80
    $strsth .= ") order by variable";
79
    $sth = $dbh->prepare($strsth);
81
    $sth = $dbh->prepare($strsth);
80
    $sth->execute();
82
    $sth->execute(@sql_bind);
81
83
82
    while ( my $data = $sth->fetchrow_hashref ) {
84
    while ( my $data = $sth->fetchrow_hashref ) {
83
            unless (defined $data->{value}) { $data->{value} = "";}
85
            unless (defined $data->{value}) { $data->{value} = "";}
84
- 

Return to bug 14521