Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 1fe74e53

Von Moritz Bunkus vor fast 14 Jahren hinzugefügt

  • ID 1fe74e53d153ed2ac08da4943b9252ab2cd3da67
  • Vorgänger 7651239b
  • Nachfolger 7b583506

Zirkuläre Referenzen auflösen

Unterschiede anzeigen:

SL/Auth/LDAP.pm
2 2 

  		




  3
  3
  
    
use English '-no_match_vars';


  		




  4
  4
  
    

  		




  
  5
  
    
use Scalar::Util qw(weaken);


  		




  5
  6
  
    
use SL::Auth::Constants qw(:all);


  		




  6
  7
  
    

  		




  7
  8
  
    
use strict;


  		




  ......




  17
  18
  
    
  my $self = {};


  		




  18
  19
  
    

  		




  19
  20
  
    
  $self->{auth} = shift;


  		




  
  21
  
    
  weaken $self->{auth};


  		




  20
  22
  
    

  		




  21
  23
  
    
  bless $self, $type;


  		




  22
  24
  
    

  		












Auch abrufbar als:  Unified diff