-$nodouble = 1 if $op eq 'modify'; # FIXME hack to represent fact that if we're
- # modifying an existing patron, it ipso facto
- # isn't a duplicate. Marking FIXME because this
- # script needs to be refactored.
-my $select_city = $input->param('select_city');
-my $nok = $input->param('nok');
-my $guarantorinfo = $input->param('guarantorinfo');
-my $step = $input->param('step') || 0;
+my $duplicate = $input->param('duplicate');
+$nodouble = 1 if ($op eq 'modify' or $op eq 'duplicate'); # FIXME hack to represent fact that if we're
+ # modifying an existing patron, it ipso facto
+ # isn't a duplicate. Marking FIXME because this
+ # script needs to be refactored.
+my $select_city = $input->param('select_city');
+my $nok = $input->param('nok');
+my $guarantorinfo = $input->param('guarantorinfo');
+my $step = $input->param('step') || 0;