|
Lines 182-193
ok (CanUserModifyBudget($borrower2, $budget11, $flags));
Link Here
|
| 182 |
ok (CanUserModifyBudget($borrower2, $budget12, $flags)); |
182 |
ok (CanUserModifyBudget($borrower2, $budget12, $flags)); |
| 183 |
|
183 |
|
| 184 |
# Restriction is 'owner and users' |
184 |
# Restriction is 'owner and users' |
| 185 |
ok (CanUserModifyBudget($borrower1, $budget13, $flags)); |
185 |
ok (!CanUserModifyBudget($borrower1, $budget13, $flags)); # no owner, no user |
| 186 |
ok (CanUserModifyBudget($borrower1, $budget14, $flags)); |
186 |
ok (CanUserModifyBudget($borrower1, $budget14, $flags)); |
| 187 |
ok (CanUserModifyBudget($borrower1, $budget15, $flags)); |
187 |
ok (CanUserModifyBudget($borrower1, $budget15, $flags)); |
| 188 |
ok (CanUserModifyBudget($borrower1, $budget16, $flags)); |
188 |
ok (CanUserModifyBudget($borrower1, $budget16, $flags)); |
| 189 |
ok (CanUserModifyBudget($borrower2, $budget13, $flags)); |
189 |
ok (!CanUserModifyBudget($borrower2, $budget13, $flags)); # no owner, no user |
| 190 |
ok (CanUserModifyBudget($borrower2, $budget14, $flags)); |
190 |
ok (!CanUserModifyBudget($borrower2, $budget14, $flags)); # No owner and user list contains borrower1 |
| 191 |
ok (CanUserModifyBudget($borrower2, $budget15, $flags)); |
191 |
ok (CanUserModifyBudget($borrower2, $budget15, $flags)); |
| 192 |
ok (!CanUserModifyBudget($borrower2, $budget16, $flags)); |
192 |
ok (!CanUserModifyBudget($borrower2, $budget16, $flags)); |
| 193 |
|
193 |
|
|
Lines 220-236
ok (CanUserModifyBudget($borrower1, $budget10, $flags));
Link Here
|
| 220 |
ok (CanUserModifyBudget($borrower1, $budget11, $flags)); |
220 |
ok (CanUserModifyBudget($borrower1, $budget11, $flags)); |
| 221 |
ok (CanUserModifyBudget($borrower1, $budget12, $flags)); |
221 |
ok (CanUserModifyBudget($borrower1, $budget12, $flags)); |
| 222 |
ok (CanUserModifyBudget($borrower2, $budget9, $flags)); |
222 |
ok (CanUserModifyBudget($borrower2, $budget9, $flags)); |
| 223 |
ok (CanUserModifyBudget($borrower2, $budget10, $flags)); |
223 |
ok (!CanUserModifyBudget($borrower2, $budget10, $flags)); # Limited to library B1 |
| 224 |
ok (CanUserModifyBudget($borrower2, $budget11, $flags)); |
224 |
ok (CanUserModifyBudget($borrower2, $budget11, $flags)); |
| 225 |
ok (!CanUserModifyBudget($borrower2, $budget12, $flags)); |
225 |
ok (!CanUserModifyBudget($borrower2, $budget12, $flags)); |
| 226 |
|
226 |
|
| 227 |
# Restriction is 'owner and users' |
227 |
# Restriction is 'owner and users' |
| 228 |
ok (CanUserModifyBudget($borrower1, $budget13, $flags)); |
228 |
ok (!CanUserModifyBudget($borrower1, $budget13, $flags)); # No owner, no user |
| 229 |
ok (CanUserModifyBudget($borrower1, $budget14, $flags)); |
229 |
ok (CanUserModifyBudget($borrower1, $budget14, $flags)); |
| 230 |
ok (CanUserModifyBudget($borrower1, $budget15, $flags)); |
230 |
ok (CanUserModifyBudget($borrower1, $budget15, $flags)); |
| 231 |
ok (CanUserModifyBudget($borrower1, $budget16, $flags)); |
231 |
ok (CanUserModifyBudget($borrower1, $budget16, $flags)); |
| 232 |
ok (CanUserModifyBudget($borrower2, $budget13, $flags)); |
232 |
ok (!CanUserModifyBudget($borrower2, $budget13, $flags)); # No owner, no user |
| 233 |
ok (CanUserModifyBudget($borrower2, $budget14, $flags)); |
233 |
ok (!CanUserModifyBudget($borrower2, $budget14, $flags)); # No owner and user list contains borrower1 |
| 234 |
ok (CanUserModifyBudget($borrower2, $budget15, $flags)); |
234 |
ok (CanUserModifyBudget($borrower2, $budget15, $flags)); |
| 235 |
ok (!CanUserModifyBudget($borrower2, $budget16, $flags)); |
235 |
ok (!CanUserModifyBudget($borrower2, $budget16, $flags)); |
| 236 |
|
236 |
|