[rt-users] Unable to create a ticket

[Paulo Matos]

On Wed, 16 Jun 2004, Chimbu Thankachan wrote:

> I have a fresh install of RT 3.0.11 on Tao Linux running on Postgres and modperl1. When I try to create a ticket , i get the following error
(...)
>
> Unrecognised line: xyz at intelsat.com at /opt/rt3/lib/RT/EmailParser.pm line 404
(...)
> I see that this error has been raised before in the mailing list but no one has replied to it.

Ok. The problem is with perl-5.8.0, take a look at the bottom of:

http://rt3.fsck.com/Ticket/Display.html?id=5286&user=guest&pass=guest

the full explanation is here:

http://lists.fsck.com/pipermail/rt-devel/2004-April/005725.html

and the solution is:

1) upgrade to perl-5.8.3 or later (Recommended)
2) apply the attached patch.

Regards,

--
	Paulo Matos
 ----------------------------------- ----------------------------------
|Sys & Net Admin                    | Serviço de Informática           |
|Faculdade de Ciências e Tecnologia | Tel: +351-21-2948596             |
|Universidade Nova de Lisboa        | Fax: +351-21-2948548             |
|P-2829-516 Caparica                | e-Mail: pjsm at fct.unl.pt          |
 ----------------------------------- ----------------------------------
-------------- next part --------------
#
# rt-3.0.11-Autocreation_with_name_WorkAround_for_perl5.8.0.patch
#
# NOTE: This should only be applied as a workaround if you use perl >= 5.8.0
# or <= 5.8.2.
#
# * 2004.06.17 Paulo Matos <paulo.matos at fct.unl.pt>
# - Updated to apply directly to stock 3.0.11.
#
# * 2004.04.27 Paulo Matos <paulo.matos at fct.unl.pt>
# - Added Encode::_utf8_off so it won't broke Mail::Address
# parse() function.
#
diff -uNr rt-3.0.11.orig/lib/RT/Queue_Overlay.pm rt-3.0.11/lib/RT/Queue_Overlay.pm
--- rt-3.0.11.orig/lib/RT/Queue_Overlay.pm	2004-05-24 03:14:26.000000000 +0100
+++ rt-3.0.11/lib/RT/Queue_Overlay.pm	2004-06-17 02:17:43.000000000 +0100
@@ -49,6 +49,7 @@
 use RT::Groups;
 use RT::ACL;
 use RT::EmailParser;
+use Encode;
 
 
 @ACTIVE_STATUS = qw(new open stalled);
@@ -605,6 +606,7 @@
         # if the user doesn't exist, we need to create a new user
              my $new_user = RT::User->new($RT::SystemUser);
 
+            Encode::_utf8_off($args{'Email'});
             my ( $Address, $Name ) =  
                RT::EmailParser::ParseAddressFromHeader('', $args{'Email'});
 
diff -uNr rt-3.0.11.orig/lib/RT/User_Overlay.pm rt-3.0.11/lib/RT/User_Overlay.pm
--- rt-3.0.11.orig/lib/RT/User_Overlay.pm	2004-04-26 23:14:44.000000000 +0100
+++ rt-3.0.11/lib/RT/User_Overlay.pm	2004-06-17 02:18:59.000000000 +0100
@@ -54,6 +54,7 @@
 use RT::Principals;
 use RT::ACE;
 use RT::EmailParser;
+use Encode;
 
 
 # {{{ sub _Accessible 
@@ -596,6 +597,7 @@
 
         my ($val, $message);
 
+        Encode::_utf8_off($email);
 	my ( $Address, $Name ) =
 		RT::EmailParser::ParseAddressFromHeader('', $email);
 	$email = $Address;