Re: [cobalt-users] Neomail Email Addresses

["D'Sphitz" <dillybar1@xxxxxxxxxxxxxx>]

after these lines:
> if ($SITEHOSTNAME =~ /^([-\@\w.]+)$/) {
>     $SITEHOSTNAME = $1;                     # $data now untainted
> }

add this:
    $SITEHOSTNAME =~ s/^[a-z0-9 ]+\.(.+)$/$1/i;


----- Original Message ----- 
From: "Jim Scott" <cobaltlist@xxxxxxxxxxxx>
To: <cobalt-users@xxxxxxxxxxxxxxx>
Sent: Thursday, November 29, 2001 1:15 AM
Subject: [cobalt-users] Neomail Email Addresses


> Does anyone have a patch to eliminate the hostname from the email address in
> the currect neomail package.
> 
> For instance if you are hosting a domain name on your raq server called
> www.domain.com and you go to www.domain.com/neomail and log in and go to
> preferrences you will notice that the username is user@xxxxxxxxxxxxxx
> 
> I want this to only be user@xxxxxxxxxx
> 
> I assume the code is below that gets this information for later use. Anyone
> know what needs to be done to have it remove the hostname off the front of
> it?
> 
> # domainnames - Users can choose their outgoing mail domain from any one
> listed
> #               in this array, enabling admins to now only install a single
> #               copy of NeoMail and still support multiple domains.
> #Taco
> my $SITEHOSTNAME=$ENV{HTTP_HOST};
> if ($SITEHOSTNAME =~ /^([-\@\w.]+)$/) {
>     $SITEHOSTNAME = $1;                     # $data now untainted
> }
> #@domainnames = qw( cobalt.com );
> @domainnames = $SITEHOSTNAME;
> 
> Thanks in advance.
> 
> Jim
> 
> 
> _______________________________________________
> cobalt-users mailing list
> cobalt-users@xxxxxxxxxxxxxxx
> To Subscribe or Unsubscribe, please go to:
> http://list.cobalt.com/mailman/listinfo/cobalt-users