Added the possibility to provide the sendmail location in NOTIFICATION_SENDMAIL_MAILER.
Added NOTIFICATION_STORAGE_MAILER which allow to store the email in a storage (could be just output, file, database ...) Added SMTP implementation, based on EiffelNet SMTP_PROTOCOL. note: it is possible to exclude this by setting ecf variable "smtp_notification_email_disabled" to "True" this way help to manage dependencies, since the Eiffel Net library would not be included neither. Fixed Date header value computation.
This commit is contained in:
@@ -2,9 +2,9 @@ note
|
||||
description: "[
|
||||
Component responsible to send email
|
||||
]"
|
||||
author: "$Author$"
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
author: "$Author: jfiat $"
|
||||
date: "$Date: 2015-06-30 11:07:17 +0200 (mar., 30 juin 2015) $"
|
||||
revision: "$Revision: 97586 $"
|
||||
|
||||
deferred class
|
||||
NOTIFICATION_MAILER
|
||||
@@ -45,8 +45,40 @@ feature -- Basic operation
|
||||
deferred
|
||||
end
|
||||
|
||||
feature -- Error
|
||||
|
||||
has_error: BOOLEAN
|
||||
-- Previous operation reported error?
|
||||
-- Use `reset_errors', to reset this state.
|
||||
do
|
||||
Result := attached last_errors as lst and then not lst.is_empty
|
||||
end
|
||||
|
||||
reset_errors
|
||||
-- Reset last errors.
|
||||
do
|
||||
last_errors := Void
|
||||
end
|
||||
|
||||
last_errors: detachable ARRAYED_LIST [READABLE_STRING_32]
|
||||
-- Last reported errors since previous `reset_errors' call.
|
||||
|
||||
report_error (a_msg: READABLE_STRING_GENERAL)
|
||||
-- Report error message `a_msg'.
|
||||
local
|
||||
lst: like last_errors
|
||||
do
|
||||
lst := last_errors
|
||||
if lst = Void then
|
||||
create lst.make (1)
|
||||
last_errors := lst
|
||||
end
|
||||
lst.force (a_msg.to_string_32)
|
||||
end
|
||||
|
||||
|
||||
note
|
||||
copyright: "2011-2013, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
|
||||
copyright: "2011-2015, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
|
||||
license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
|
||||
source: "[
|
||||
Eiffel Software
|
||||
|
||||
Reference in New Issue
Block a user