not returning the copy-alert-message event on renewals
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 13 Sep 2006 16:41:21 +0000 (16:41 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 13 Sep 2006 16:41:21 +0000 (16:41 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@6080 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm

index 65dfaff..0242cd7 100644 (file)
@@ -690,6 +690,7 @@ sub run_copy_permit_scripts {
 
 sub check_copy_alert {
        my $self = shift;
+       return undef if $self->is_renewal;
        return OpenILS::Event->new(
                'COPY_ALERT_MESSAGE', payload => $self->copy->alert_message)
                if $self->copy and $self->copy->alert_message;