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

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

Return to bug 35597