~ubuntu-branches/ubuntu/natty/otrs2/natty-updates

« back to all changes in this revision

Viewing changes to Kernel/System/Ticket/Number/AutoIncrement.pm

  • Committer: Package Import Robot
  • Author(s): Torsten Werner
  • Date: 2007-04-14 17:58:55 UTC
  • mto: (20.1.1 squeeze)
  • mto: This revision was merged to the branch mainline in revision 6.
  • Revision ID: package-import@ubuntu.com-20070414175855-9ne0w01yu1q44ch0
Tags: upstream-2.1.7
ImportĀ upstreamĀ versionĀ 2.1.7

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
# --
2
2
# Ticket/Number/AutoIncrement.pm - a ticket number auto increment generator
3
 
# Copyright (C) 2001-2005 Martin Edenhofer <martin+code@otrs.org>
 
3
# Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
4
4
# --
5
 
# $Id: AutoIncrement.pm,v 1.14 2005/05/15 09:12:23 martin Exp $
 
5
# $Id: AutoIncrement.pm,v 1.16 2006/12/05 08:04:03 martin Exp $
6
6
# --
7
7
# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8
8
# the enclosed file COPYING for license information (GPL). If you
19
19
use strict;
20
20
 
21
21
use vars qw($VERSION);
22
 
$VERSION = '$Revision: 1.14 $';
 
22
$VERSION = '$Revision: 1.16 $';
23
23
$VERSION =~ s/^\$.*:\W(.*)\W.+?$/$1/;
24
24
 
25
25
sub CreateTicketNr {
74
74
    # Check ticket number. If exists generate new one!
75
75
    if ($Self->CheckTicketNr(Tn=>$Tn)) {
76
76
        $Self->{LoopProtectionCounter}++;
77
 
        if ($Self->{LoopProtectionCounter} >= 1000) {
 
77
        if ($Self->{LoopProtectionCounter} >= 6000) {
78
78
          # loop protection
79
79
          $Self->{LogObject}->Log(
80
80
            Priority => 'error',