]> git.evergreen-ils.org Git - Evergreen.git/commit
return, not next, from eval BLOCK
authorDan Scott <dscott@laurentian.ca>
Fri, 21 Jun 2013 03:39:21 +0000 (23:39 -0400)
committerBill Erickson <berick@esilibrary.com>
Fri, 21 Jun 2013 13:40:36 +0000 (09:40 -0400)
commit144fb20f896bf7bb4576177baf6554aa035e9afa
treec127a16b86ff79a74b0f9b926701565b47c6409a
parent0c37a958ff32fd394b8a60b33b4d218acf2f83ef
return, not next, from eval BLOCK

Per perldoc eval, exiting an eval BLOCK is not allowed. And it generates
warnings - 37,000 of them in one day - on a system on which the fine
generator runs every 15 minutes. Simply returning from the block
achieves the same goal without generating scads of warnings.

Signed-off-by: Dan Scott <dscott@laurentian.ca>
Signed-off-by: Bill Erickson <berick@esilibrary.com>
Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm