X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Flib%2FRT%2FInterface%2FWeb_Vendor.pm;h=023dede8f8d5c3dad5e6f5708403c05d64282b90;hb=f46c9ed67a0d771216210729a24878a75931853d;hp=7a4804bf92cd8dcc3e472d7f87cedbbd8564b8dc;hpb=728ab2fda5b05b3021b62a3c5d7c4d97e97edcaa;p=freeside.git diff --git a/rt/lib/RT/Interface/Web_Vendor.pm b/rt/lib/RT/Interface/Web_Vendor.pm index 7a4804bf9..023dede8f 100644 --- a/rt/lib/RT/Interface/Web_Vendor.pm +++ b/rt/lib/RT/Interface/Web_Vendor.pm @@ -257,17 +257,18 @@ sub ProcessTicketBasics { WillResolve ); -# causes endless redirect loops and "WillResolve changed from Not set to Not set" on ticket view? -# # the UI for editing WillResolve through Ticket Basics should allow -# # setting it to null -# my $to_date = delete($ARGSRef->{'WillResolve_Date'}); -# my $DateObj = RT::Date->new($session{'CurrentUser'}); -# if ( $to_date ) { -# $DateObj->Set(Format => 'unknown', Value => $to_date); -# } else { -# $DateObj->Set(Value => 0); -# } -# $ARGSRef->{'WillResolve'} = $DateObj->ISO; + # the UI for editing WillResolve through Ticket Basics should allow + # setting it to null + if ( exists $ARGSRef->{'WillResolve_Date'} ) { + my $to_date = delete($ARGSRef->{'WillResolve_Date'}); + my $DateObj = RT::Date->new($session{'CurrentUser'}); + if ( $to_date ) { + $DateObj->Set(Format => 'unknown', Value => $to_date); + } else { + $DateObj->Set(Value => 0); + } + $ARGSRef->{'WillResolve'} = $DateObj->ISO; + } if ( $ARGSRef->{'Queue'} and ( $ARGSRef->{'Queue'} !~ /^(\d+)$/ ) ) { my $tempqueue = RT::Queue->new($RT::SystemUser);