[otrs-cvs] CVS: otrs/Kernel/System/PostMaster DestQueue.pm, 1.17, 1.18 LoopProtection.pm,1.10,1.11

cvs-log at otrs.org cvs-log at otrs.org
Thu Nov 2 13:20:57 CET 2006


Update of /home/cvs/otrs/Kernel/System/PostMaster
In directory lancelot:/tmp/cvs-serv11671/Kernel/System/PostMaster

Modified Files:
	DestQueue.pm LoopProtection.pm 
Log Message:
removed # --

Index: DestQueue.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/PostMaster/DestQueue.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -r1.17 -r1.18
*** DestQueue.pm	29 Aug 2006 17:27:30 -0000	1.17
--- DestQueue.pm	2 Nov 2006 12:20:55 -0000	1.18
***************
*** 18,22 ****
  $VERSION =~ s/^.*:\s(\d+\.\d+)\s.*$/$1/;
  
- # --
  sub new {
      my $Type = shift;
--- 18,21 ----
***************
*** 115,118 ****
      }
  }
- # --
  1;
--- 114,116 ----

Index: LoopProtection.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/PostMaster/LoopProtection.pm,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** LoopProtection.pm	29 Aug 2006 17:27:30 -0000	1.10
--- LoopProtection.pm	2 Nov 2006 12:20:55 -0000	1.11
***************
*** 18,22 ****
  $VERSION =~ s/^\$.*:\W(.*)\W.+?$/$1/;
  
- # --
  sub new {
      my $Type = shift;
--- 18,21 ----
***************
*** 27,39 ****
      bless ($Self, $Type);
  
-     # --
      # get needed  objects
-     # --
      foreach (qw(DBObject LogObject ConfigObject)) {
          $Self->{$_} = $Param{$_} || die "Got no $_!";
      }
!     # --
      # load backend module
-     # --
      my $BackendModule = $Self->{ConfigObject}->Get('LoopProtectionModule')
        || 'Kernel::System::PostMaster::LoopProtection::DB';
--- 26,35 ----
      bless ($Self, $Type);
  
      # get needed  objects
      foreach (qw(DBObject LogObject ConfigObject)) {
          $Self->{$_} = $Param{$_} || die "Got no $_!";
      }
! 
      # load backend module
      my $BackendModule = $Self->{ConfigObject}->Get('LoopProtectionModule')
        || 'Kernel::System::PostMaster::LoopProtection::DB';
***************
*** 46,50 ****
      return $Self;
  }
! # --
  sub SendEmail {
      my $Self = shift;
--- 42,46 ----
      return $Self;
  }
! 
  sub SendEmail {
      my $Self = shift;
***************
*** 52,56 ****
      return $Self->{Backend}->SendEmail(%Param);
  }
! # --
  sub Check {
      my $Self = shift;
--- 48,52 ----
      return $Self->{Backend}->SendEmail(%Param);
  }
! 
  sub Check {
      my $Self = shift;
***************
*** 58,62 ****
      return $Self->{Backend}->Check(%Param);
  }
- # --
  
  1;
--- 54,57 ----



More information about the cvs-log mailing list