not returning the copy-alert-message event on renewals

git-svn-id: svn://svn.open-ils.org/ILS/trunk@6080 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
index 65dfaffc1aa7c7311ee3f750e3bd2592b97d75d0..0242cd7ce235388d9e4cb3439a7640b724bef31c 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
@@ -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;