|
text.html.xalan....
a type by Internet hosting service to provide their own website accessible via the World Wide Web. Web hosts are companies that provide space on a data center. Web hosts can also provide data center space and connectivity of that Internet for servers they do not own to allows individuals and organizations to be located in their data center, called colocation. the server they own is use for their clients as well as providing Internet connectivity, typically in a A web hosting service blog view
|
|
|
http://szgy.org/cgi-bin/listinfo/cvs-log
language="JavaScript" type="text/javascript"> [otrs-cvs] CVS: otrs/Kernel/System/Ticket/CustomerPermission CustomerIDCheck.pm,1.1,1.2 GroupCheck.pm,1.1,1.2 |
|
[otrs-cvs] CVS: otrs/Kernel/System Ticket.pm,1.72,1.73: msg#00004
|
subscribe Home |
language="JavaScript" type="text/javascript" |
cached ! if ($Self->{"Cache::GetTicket".$Param{TicketID}}) { ! return %{$Self->{"Cache::GetTicket".$Param{TicketID}}}; } # db query *************** *** 471,475 **** } # cache user result ! $Self->{"GetTicket".$Param{TicketID}} = \%Ticket; # return ticket data return %Ticket; --- 475,479 ---- } # cache user result ! $Self->{"Cache::GetTicket".$Param{TicketID}} = \%Ticket; # return ticket data return %Ticket; *************** *** 507,510 **** --- 511,528 ---- } # -- + sub MoveList { + my $Self = shift; + my %Param = @_; + # check needed stuff + if (!$Param{UserID} && !$Param{CustomerUserID}) { + $Self->{LogObject}->Log(Priority => "error", Message => "Need UserID is CustomerUserID!"); + return; + } + # TicketID!!! + my %Queues = $Self->{QueueObject}->GetAllQueues(%Param); + #delete $Queues{315}; + return %Queues; + } + # -- sub MoveByTicketID { my $Self = shift; *************** *** 529,532 **** --- 547,552 ---- # queue lookup my $Queue = $Self->{QueueObject}->QueueLookup(QueueID => $Param{QueueID}); + # clear ticket cache + $Self->{"Cache::GetTicket".$Param{TicketID}} = 0; # update ticket view index $Self->TicketAcceleratorUpdate(TicketID => $Param{TicketID}); *************** *** 568,572 **** } # -- ! sub GetMoveQueueList { my $Self = shift; my %Param = @_; --- 588,592 ---- } # -- ! sub MoveQueueList { my $Self = shift; my %Param = @_; *************** *** 645,648 **** --- 665,670 ---- return; } + # clear ticket cache + $Self->{"Cache::GetTicket".$Param{TicketID}} = 0; # db quote foreach (keys %Param) { *************** *** 717,720 **** --- 739,744 ---- return 1; } + # clear ticket cache + $Self->{"Cache::GetTicket".$Param{TicketID}} = 0; # db quote my $DBValue = $Self->{DBObject}->Quote($Value); *************** *** 760,763 **** --- 784,789 ---- } } + # clear ticket cache + $Self->{"Cache::GetTicket".$Param{TicketID}} = 0; # db quote foreach (keys %Param) { *************** *** 1042,1045 **** --- 1068,1073 ---- } my $time = timelocal(1,$Param{Minute},$Param{Hour},$Param{Day},($Param{Month}-1),$Param{Year}); + # clear ticket cache + $Self->{"Cache::GetTicket".$Param{TicketID}} = 0; # db quote foreach (keys %Param) { _______________________________________________ OTRS mailing list: cvs-log - Web-CVS of Update or /home/cvs/otrs/Kernel/System In directory esanta:/tmp/cvs-serv2631/Kernel/System Modified Files: Ticket.pm Log Message: added GetTicket() auto cache Index: Ticket.pm =================================================================== RCS file: /home/cvs/otrs/Kernel/System/Ticket.pm,v retrieving revision 1.72 retrieving revision 1.73 diff -C2 -r1.72 -r1.73 *** Ticket.pm 12 Mar 2004 18:42:54 -0000 1.72 --- Ticket.pm 1 Apr 2004 08:58:35 -0000 1.73 *************** *** 320,324 **** --- 320,328 ---- } if ($Self->{DBObject}->Do(SQL => "DELETE FROM ticket WHERE id = $Param{TicketID}")) { + # clear ticket cache + $Self->{"Cache::GetTicket".$Param{TicketID}} = 0; + # update ticket index $Self->TicketAcceleratorDelete(%Param); + # delete articles $Self->DeleteArticleOfTicket(%Param); return 1; *************** *** 388,393 **** } # check if result is cached ! if ($Param{Cached} && $Self->{"GetTicket".$Param{TicketID}}) { ! return %{$Self->{"GetTicket".$Param{TicketID}}}; } # db query --- 392,397 ---- } # check if result Oracle Magazine kde.devel.konve...
|
<prev
cvs-log
boot-loaders.gr...
subscribe
|
| [otrs-cvs] CVS: otrs/Kernel/System Ticket.pm,1.72,1.73
language="JavaScript" type="text/javascript"> [otrs-cvs] CVS: otrs/Kernel/System/Ticket/CustomerPermission CustomerIDCheck.pm,1.1,1.2 GroupCheck.pm,1.1,1.2 |
|
| |
language="JavaScript" type="text/javascript" 