Subversion Repositories VORC

Rev

Rev 196 | Rev 229 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 196 Rev 222
Line 110... Line 110...
110 
                       ( $h->option ({ selected=>[], value=>$_ }, $_ eq "-blank-" ? $_ : $DepartmentNames->{$_}) ) :
 110 
                       ( $h->option ({ selected=>[], value=>$_ }, $_ eq "-blank-" ? $_ : $DepartmentNames->{$_}) ) :
111 
                       ( $h->option ({ value=>$_ },               $_ eq "-blank-" ? $_ : $DepartmentNames->{$_}) )  } @options;
 111 
                       ( $h->option ({ value=>$_ },               $_ eq "-blank-" ? $_ : $DepartmentNames->{$_}) )  } @options;
Line 112... Line 112...
112
112
Line -... Line 113...
- 
 
 113 
    unshift @options, $tmpFormValue eq "" ? "<option selected></option>" : "<option></option>";
113 
    unshift @options, $tmpFormValue eq "" ? "<option selected></option>" : "<option></option>";
 114
114
115 
    my $autoload = param ("autoload") // 1;
115 
    return param ("autoload") ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
 116 
    return $autoload ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
Line 116... Line 117...
116 
  }
 117 
  }
117 
}
 118 
}
Line 132... Line 133...
132 
                       ( $h->option ({ selected=>[], value=>$_ }, $ROLE->{$_}) ) :
 133 
                       ( $h->option ({ selected=>[], value=>$_ }, $ROLE->{$_}) ) :
133 
                       ( $h->option ({ value=>$_ },               $ROLE->{$_}) )  } @options;
 134 
                       ( $h->option ({ value=>$_ },               $ROLE->{$_}) )  } @options;
Line 134... Line 135...
134
135
Line -... Line 136...
- 
 
 136 
    unshift @options, $tmpFormValue eq "" ? "<option selected></option>" : "<option></option>";
135 
    unshift @options, $tmpFormValue eq "" ? "<option selected></option>" : "<option></option>";
 137
136
138 
    my $autoload = param ("autoload") // 1;
137 
    return param ("autoload") ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
 139 
    return $autoload ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
Line 138... Line 140...
138 
  }
 140 
  }
139 
}
 141 
}
Line 150... Line 152...
150
152
151 
    @options = map { $tmpFormValue eq $_ ?
 153 
    @options = map { $tmpFormValue eq $_ ?
152 
                       ( $h->option ({ selected=>[] }, $_) ) :
 154 
                       ( $h->option ({ selected=>[] }, $_) ) :
Line -... Line 155...
- 
 
 155 
                       ( $h->option (                  $_) )  } @options;
153 
                       ( $h->option (                  $_) )  } @options;
 156
154
157 
    my $autoload = param ("autoload") // 1;
155 
    return param ("autoload") ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
 158 
    return $autoload ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
Line 156... Line 159...
156 
  }
 159 
  }
157 
}
 160 
}
Line 168... Line 171...
168
171
169 
    @options = map { $tmpFormValue eq $_ ?
 172 
    @options = map { $tmpFormValue eq $_ ?
170 
                       ( $h->option ({ selected=>[] }, $_) ) :
 173 
                       ( $h->option ({ selected=>[] }, $_) ) :
Line -... Line 174...
- 
 
 174 
                       ( $h->option (                  $_) )  } @options;
171 
                       ( $h->option (                  $_) )  } @options;
 175
172
176 
    my $autoload = param ("autoload") // 1;
173 
    return param ("autoload") ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
 177 
    return $autoload ? $h->select ({ name=>"filter-".$colName, onChange=>"page.value = 1; submit();" }, [@options]) : $h->select ({ name=>"filter-".$colName }, [$h->option (), @options]);
Line 174... Line 178...
174 
  }
 178 
  }
175 
}
 179 
}