Model::Users::Messages: fix error handling

diff --git a/src/newslash_web/lib/Newslash/Model/Users/Messages.pm b/src/newslash_web/lib/Newslash/Model/Users/Messages.pm
index 5ca89fe..63d9f13 100644 (file)
--- a/src/newslash_web/lib/Newslash/Model/Users/Messages.pm
+++ b/src/newslash_web/lib/Newslash/Model/Users/Messages.pm
@@ -110,6 +110,7 @@ sub set {
 
     # check if mode is allowed
     if (!$self->_is_mode_allowed($mode, $code)) {
+        $self->set_error("mode $mode is not allowed for message $code");
         return;
     }