rt/etc/upgrade/3.7.10/content

   1 use strict;
   2 use warnings;
   3
   4
   5 our @Templates = (
   6     {  Queue       => 0,
   7        Name        => "Error: public key",    # loc
   8        Description =>
   9          "Inform user that he has problems with public key and couldn't recieve encrypted content", # loc
  10        Content => q{Subject: We have no your public key or it's wrong
  11
  12 You received this message as we have no your public PGP key or we have a problem with your key. Inform the administrator about the problem.
  13 }
  14     },
  15     {  Queue       => 0,
  16        Name        => "Error to RT owner: public key",    # loc
  17        Description =>
  18          "Inform RT owner that user(s) have problems with public keys", # loc
  19        Content => q{Subject: Some users have problems with public keys
  20
  21 You received this message as RT has problems with public keys of the following user:
  22 {
  23     foreach my $e ( @BadRecipients ) {
  24         $OUT .= "* ". $e->{'Message'} ."\n";
  25     }
  26 }}
  27     },
  28     {  Queue       => 0,
  29        Name        => "Error: no private key",    # loc
  30        Description =>
  31          "Inform user that we received an encrypted email and we have no private keys to decrypt", # loc
  32        Content => q{Subject: we received message we cannot decrypt
  33
  34 You sent an encrypted message with subject '{ $Message->head->get('Subject') }',
  35 but we have no private key it's encrypted to.
  36
  37 Please, check that you encrypt messages with correct keys
  38 or contact the system administrator.}
  39     },
  40     {  Queue       => 0,
  41        Name        => "Error: bad GnuPG data",    # loc
  42        Description =>
  43          "Inform user that a message he sent has invalid GnuPG data", # loc
  44        Content => q{Subject: We received a message we cannot handle
  45
  46 You sent us a message that we cannot handle due to corrupted GnuPG signature or encrypted block. we get the following error(s):
  47 { foreach my $msg ( @Messages ) {
  48     $OUT .= "* $msg\n";
  49   }
  50 }}
  51     },
  52 );