Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision b66801e2

Von Tamino Steinert vor 7 Monaten hinzugefügt

  • ID b66801e2ac8aab53073b1b4e96e43a1d7a67f15f
  • Vorgänger a304b407
  • Nachfolger fefc824c

S:Presenter:Record: Alias Funktion "show" in verwendeten Objekten

Verknüpfte Belege nutzt folgende Objekte:
    DeliveryOrder, Dunning, EmailJournal, GL, Invoice, Letter, Order,
    Reclamation, RequirementSpec, ShopOrder

Unterschiede anzeigen:

SL/Presenter/Letter.pm
6 6 
use SL::Presenter::Tag         qw(link_tag);
7 7 

  		




  8
  8
  
    
use Exporter qw(import);


  		




  9
  
  
    
our @EXPORT_OK = qw(letter);


  		




  
  9
  
    
our @EXPORT_OK = qw(show letter);


  		




  10
  10
  
    

  		




  11
  11
  
    
use Carp;


  		




  12
  12
  
    

  		




  
  13
  
    
sub show {goto &letter};


  		




  
  14
  
    

  		




  13
  15
  
    
sub letter {


  		




  14
  16
  
    
  my ($letter, %params) = @_;


  		




  15
  17
  
    

  		




  ......




  43
  45
  
    

  		




  44
  46
  
    
  my $letter = SL::DB::Manager::Letter->get_first(where => [ … ]);


  		




  45
  47
  
    
  my $html   = SL::Presenter::Letter::letter($letter, display => 'inline');


  		




  
  48
  
    
  # or


  		




  
  49
  
    
  my $html   = $letter->presenter->show();


  		




  46
  50
  
    

  		




  47
  51
  
    
=head1 FUNCTIONS


  		




  48
  52
  
    

  		




  49
  53
  
    
=over 4


  		




  50
  54
  
    

  		




  
  55
  
    
=item C<show $object>


  		




  
  56
  
    

  		




  
  57
  
    
Alias for C<letter $object %params>.


  		




  
  58
  
    

  		




  51
  59
  
    
=item C<letter $object, %params>


  		




  52
  60
  
    

  		




  53
  61
  
    
Returns a rendered version (actually an instance of


  		












Auch abrufbar als:  Unified diff