diff options
author | Dylan William Hardison <dylan@hardison.net> | 2016-09-12 22:22:17 +0200 |
---|---|---|
committer | Dylan William Hardison <dylan@hardison.net> | 2016-09-12 22:22:17 +0200 |
commit | 14bcdce1dc6029c3676c3640d8148c83c14692e5 (patch) | |
tree | 99d760e13b687f8111635916d9ed3937bc084c64 /t/007util.t | |
parent | e6bf4cacb10f86077fe898349485f5c7ab9fb4b6 (diff) | |
download | bugzilla-14bcdce1dc6029c3676c3640d8148c83c14692e5.tar.gz bugzilla-14bcdce1dc6029c3676c3640d8148c83c14692e5.tar.xz |
Revert "Bug 1283930 - Add Makefile.PL & local/lib/perl5 support to bmo/master + local symlink to data/ directory"
This reverts commit e6bf4cacb10f86077fe898349485f5c7ab9fb4b6.
Diffstat (limited to 't/007util.t')
-rw-r--r-- | t/007util.t | 48 |
1 files changed, 24 insertions, 24 deletions
diff --git a/t/007util.t b/t/007util.t index b8e9505d8..b32a1b90c 100644 --- a/t/007util.t +++ b/t/007util.t @@ -1,26 +1,36 @@ -# This Source Code Form is subject to the terms of the Mozilla Public -# License, v. 2.0. If a copy of the MPL was not distributed with this -# file, You can obtain one at http://mozilla.org/MPL/2.0/. +# -*- Mode: perl; indent-tabs-mode: nil -*- # -# This Source Code Form is "Incompatible With Secondary Licenses", as -# defined by the Mozilla Public License, v. 2.0. +# The contents of this file are subject to the Mozilla Public +# License Version 1.1 (the "License"); you may not use this file +# except in compliance with the License. You may obtain a copy of +# the License at http://www.mozilla.org/MPL/ +# +# Software distributed under the License is distributed on an "AS +# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or +# implied. See the License for the specific language governing +# rights and limitations under the License. +# +# The Original Code are the Bugzilla Tests. +# +# The Initial Developer of the Original Code is Zach Lipton +# Portions created by Zach Lipton are Copyright (C) 2002 Zach Lipton. +# All Rights Reserved. +# +# Contributor(s): Zach Lipton <zach@zachlipton.com> +# Max Kanat-Alexander <mkanat@bugzilla.org> +# Frédéric Buclin <LpSolit@gmail.com> ################# #Bugzilla Test 7# #####Util.pm##### -use 5.10.1; -use strict; -use warnings; - -use lib qw(. lib local/lib/perl5 t); +use lib 't'; use Support::Files; -use Test::More tests => 17; -use DateTime; +use Test::More tests => 15; BEGIN { - use_ok('Bugzilla'); - use_ok('Bugzilla::Util'); + use_ok(Bugzilla); + use_ok(Bugzilla::Util); } # We need to override user preferences so we can get an expected value when @@ -63,16 +73,6 @@ foreach my $input (keys %email_strings) { "email_filter('$input')"); } -# validate_email_syntax. We need to override some parameters. -my $params = Bugzilla->params; -$params->{emailregexp} = '.*'; -$params->{emailsuffix} = ''; -my $ascii_email = 'admin@company.com'; -# U+0430 returns the Cyrillic "а", which looks similar to the ASCII "a". -my $utf8_email = "\N{U+0430}dmin\@company.com"; -ok(validate_email_syntax($ascii_email), 'correctly formatted ASCII-only email address is valid'); -ok(!validate_email_syntax($utf8_email), 'correctly formatted email address with non-ASCII characters is rejected'); - # diff_arrays(): my @old_array = qw(alpha beta alpha gamma gamma beta alpha delta epsilon gamma); my @new_array = qw(alpha alpha beta gamma epsilon delta beta delta); |