LP#1620750 Prevent log warning for uninit var in checkin_retarget() user/dbs/lp1620750_uninit_var_checkin_retarget
authorDan Scott <dscott@laurentian.ca>
Tue, 6 Sep 2016 17:53:02 +0000 (13:53 -0400)
committerDan Scott <dscott@laurentian.ca>
Tue, 6 Sep 2016 17:53:02 +0000 (13:53 -0400)
commit25f3c67032c1b9be806fd05d1bb20ddc16e98348
treea2ca3aecc2132a07bfc7c1f01e65e0af5d934709
parente1a555e3d1d1c2a079a0fd6294e8d1fafa3f8818
LP#1620750 Prevent log warning for uninit var in checkin_retarget()

If the retarget_mode variable is not initialized, then a warning is generated
in the logs every time an item is checked in. Avoid the warning by
short-circuiting before testing the value in the regex.

Signed-off-by: Dan Scott <dscott@laurentian.ca>
Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm