View | Details | Raw Unified | Return to bug 35597
Collapse All | Expand All

(-)a/Koha/Suggestion.pm (-3 / +5 lines)
Lines 69-74 sub store { Link Here
69
69
70
    my $emailpurchasesuggestions = C4::Context->preference("EmailPurchaseSuggestions");
70
    my $emailpurchasesuggestions = C4::Context->preference("EmailPurchaseSuggestions");
71
71
72
    my $new_suggestion = !$self->in_storage;
73
72
    my $result = $self->SUPER::store();
74
    my $result = $self->SUPER::store();
73
75
74
    if( $emailpurchasesuggestions ){
76
    if( $emailpurchasesuggestions ){
Lines 112-119 sub store { Link Here
112
            ) or warn "can't enqueue letter $letter";
114
            ) or warn "can't enqueue letter $letter";
113
        }
115
        }
114
    }
116
    }
115
    if (C4::Context->preference("NewsLog")) {
117
    my $suggestion_object = Koha::Suggestions->find( $result->suggestionid );
116
        logaction('SUGGESTION', 'CREATE', $result->suggestionid, '' );
118
    if ( $new_suggestion && C4::Context->preference("SuggestionsLog") ) {
119
        logaction('SUGGESTION', 'CREATE', $result->suggestionid, $suggestion_object );
117
    }
120
    }
118
    return $result;
121
    return $result;
119
}
122
}
120
- 

Return to bug 35597