[rt-users] Autogen password autoreply template

[John Rowling]

Hi Jesse,

  That was a mighty quick response ;-) The full template is included
below - it's pretty much the same as the one you posted apart from some
minor text changes. There may be a syntax error in there; the version I
saw in the maillist had some bad character translation in it. I've tried
it both global and queue-specific.

Thanks

JR


<-- cut here -->
Subject: AutoReply: {$Ticket->Subject}


Greetings,

This message has been automatically generated in response to the
creation of a helpdesk call:
         "{$Ticket->Subject()}",
a summary of which appears below.

There is no need to reply to this message right now.  Your ticket has been
assigned an ID of [{$rtname} #{$Ticket->id()}]. Please include this string
in the subject line of all future correspondence about this issue.

{
*RT::User::GenerateRandomNextChar = \&RT::User::_GenerateRandomNextChar;


if (($Transaction->CreatorObj->id != $RT::Nobody->id) &&
     (!$Transaction->CreatorObj->Privileged) &&
     ($Transaction->CreatorObj->__Value('Password') eq '*NO-PASSWORD*')
     ) {

         my $user = RT::User->new($RT::SystemUser);
         $user->Load($Transaction->CreatorObj->Id);
         my ($stat, $pass) = $user->SetRandomPassword();

         if (!$stat) {
                 $OUT .=
"An internal error has occurred. RT was not able to set a password for you.
Please contact your local RT administrator for assistance.";

         }

$out .= "
You can check the current status and history of your requests at:

         ".$RT::WebURL."

When prompted, enter the following username and password:

         Username: ".$user->Name."
         Password: ".$pass."
";
}
}

                         Thank you.
                         {$Ticket->QueueObj->CorrespondAddress()}

-------------------------------------------------------------------------
{$Transaction->Content()}
<-- cut here -->