Lines 13-33
return {
Link Here
|
13 |
UPDATE systempreferences SET variable = "StaffLoginRestrictLibraryByIP" |
13 |
UPDATE systempreferences SET variable = "StaffLoginRestrictLibraryByIP" |
14 |
WHERE variable = "AutoLocation" |
14 |
WHERE variable = "AutoLocation" |
15 |
} |
15 |
} |
16 |
); |
16 |
) == 1 |
17 |
|
17 |
&& say_success( $out, "Renamed system preference 'AutoLocation' to 'StaffLoginRestrictLibraryByIP'" ); |
18 |
say_success( $out, "Renamed system preference 'AutoLocation' to 'StaffLoginRestrictLibraryByIP'" ); |
|
|
19 |
|
18 |
|
20 |
$dbh->do( |
19 |
$dbh->do( |
21 |
q{ |
20 |
q{ |
22 |
UPDATE systempreferences SET variable = "StaffLoginRestrictLibraryByIP" |
21 |
UPDATE systempreferences SET variable = "StaffLoginRestrictLibraryByIP" |
23 |
WHERE variable = "StaffLoginLibraryBasedOnIP" |
22 |
WHERE variable = "StaffLoginLibraryBasedOnIP" |
24 |
} |
23 |
} |
25 |
); |
24 |
) == 1 |
26 |
|
25 |
&& say_success( |
27 |
say_success( |
|
|
28 |
$out, |
26 |
$out, |
29 |
"Renamed system preference 'StaffLoginLibraryBasedOnIP' to 'StaffLoginRestrictLibraryByIP'" |
27 |
"Renamed system preference 'StaffLoginLibraryBasedOnIP' to 'StaffLoginRestrictLibraryByIP'" |
30 |
); |
28 |
); |
31 |
|
29 |
|
32 |
}, |
30 |
}, |
33 |
}; |
31 |
}; |
34 |
- |
|
|