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

(-)a/C4/Branch.pm (-2 / +1 lines)
Lines 160-166 sub GetBranchesLoop (;$$) { # since this is what most pages want anyway Link Here
160
    my $onlymine = @_ ? shift : onlymine();
160
    my $onlymine = @_ ? shift : onlymine();
161
    my $branches = GetBranches($onlymine);
161
    my $branches = GetBranches($onlymine);
162
    my @loop;
162
    my @loop;
163
    foreach (sort { $branches->{$a}->{branchname} cmp $branches->{$b}->{branchname} } keys %$branches) {
163
    foreach ( sort { uc($branches->{$a}->{branchname}) cmp uc($branches->{$b}->{branchname}) } keys %$branches ) {
164
        push @loop, {
164
        push @loop, {
165
            value => $_,
165
            value => $_,
166
            selected => ($_ eq $branch) ? 1 : 0, 
166
            selected => ($_ eq $branch) ? 1 : 0, 
167
- 

Return to bug 5634