Revision 36d7ceb2
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
SL/Presenter/EmailJournal.pm | ||
---|---|---|
use SL::DB::EmailJournalAttachment;
|
||
|
||
use Exporter qw(import);
|
||
our @EXPORT_OK = qw(email_journal entry_status attachment_preview);
|
||
our @EXPORT_OK = qw(show email_journal entry_status attachment_preview);
|
||
|
||
use Carp;
|
||
|
||
sub show {goto &email_journal};
|
||
|
||
sub email_journal {
|
||
my ($email_journal_entry, %params) = @_;
|
||
|
||
... | ... | |
|
||
my $journal_entry = SL::DB::Manager::EmailJournal->get_first();
|
||
my $html = SL::Presenter::EmailJournal::email_journal($journal_entry, display => 'inline');
|
||
# or
|
||
my $html = $journal_entry->presenter->show();
|
||
|
||
# pp $html
|
||
# <a href="controller.pl?action=EmailJournal/show&id=1">IDEV Daten fuer webdav/idev/2017-KW-26.csv erzeugt</a>
|
||
... | ... | |
|
||
=over 4
|
||
|
||
=item C<show $object %params>
|
||
|
||
Alias for C<email_journal $object %params>.
|
||
|
||
=item C<email_journal $object, %params>
|
||
|
||
Returns a rendered version (actually an instance of
|
Auch abrufbar als: Unified diff
S:Presenter:Record: Alias Funktion "show" in verwendeten Objekten