Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 84e5cf3e

Von Tamino Steinert vor 8 Monaten hinzugefügt

  • ID 84e5cf3ec6c3ab8509d06029915e145d7b492153
  • Vorgänger 7e317d45
  • Nachfolger e56da3d8

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/RequirementSpec.pm
6 6 
use SL::Presenter::Tag         qw(link_tag);
7 7 

  		




  8
  8
  
    
use Exporter qw(import);


  		




  9
  
  
    
our @EXPORT_OK = qw(requirement_spec);


  		




  
  9
  
    
our @EXPORT_OK = qw(show requirement_spec);


  		




  10
  10
  
    

  		




  11
  11
  
    
use Carp;


  		




  12
  12
  
    

  		




  
  13
  
    
sub show {goto &requirement_spec};


  		




  
  14
  
    

  		




  13
  15
  
    
sub requirement_spec {


  		




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


  		




  15
  17
  
    

  		




  ......




  28
  30
  
    
}


  		




  29
  31
  
    

  		




  30
  32
  
    
1;


  		




  
  33
  
    

  		




  
  34
  
    
__END__


  		




  
  35
  
    

  		




  
  36
  
    
=pod


  		




  
  37
  
    

  		




  
  38
  
    
=encoding utf8


  		




  
  39
  
    

  		




  
  40
  
    
=head1 NAME


  		




  
  41
  
    

  		




  
  42
  
    
SL::Presenter::RequirementSpec - Presenter module for SL::DB::RequirementSpec objects


  		




  
  43
  
    

  		




  
  44
  
    
=head1 SYNOPSIS


  		




  
  45
  
    

  		




  
  46
  
    
  my $object = SL::DB::Manager::RequirementSpec->get_first();


  		




  
  47
  
    
  my $html   = SL::Presenter::RequirementSpec::requirement_spec($object);


  		




  
  48
  
    
  # or


  		




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


  		




  
  50
  
    

  		




  
  51
  
    
=head1 FUNCTIONS


  		




  
  52
  
    

  		




  
  53
  
    
=over 4


  		




  
  54
  
    

  		




  
  55
  
    
=item C<show $object>


  		




  
  56
  
    

  		




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


  		




  
  58
  
    

  		




  
  59
  
    
=item C<requirement_spec $object %params>


  		




  
  60
  
    

  		




  
  61
  
    
Returns a rendered version (actually an instance of


  		




  
  62
  
    
L<SL::Presenter::EscapedText>) of the bank transaction object


  		




  
  63
  
    
C<$object>. C<%params> gets passed to L<SL::Presenter::Tag/link_tag>.


  		




  
  64
  
    

  		




  
  65
  
    
=back


  		




  
  66
  
    

  		




  
  67
  
    
=head1 BUGS


  		




  
  68
  
    

  		




  
  69
  
    
Nothing here yet.


  		




  
  70
  
    

  		




  
  71
  
    
=head1 AUTHOR


  		




  
  72
  
    

  		




  
  73
  
    
Tamino Steinert E<lt>tamino.steinert@tamino.stE<gt>


  		




  
  74
  
    

  		




  
  75
  
    
=cut


  		












Auch abrufbar als:  Unified diff