Enable cut and sort-merge perl tests for multibyte as well
This commit is contained in:
		
							parent
							
								
									3e3be79dfd
								
							
						
					
					
						commit
						cc8ce57be2
					
				| @ -4058,13 +4058,21 @@ diff -urNp coreutils-8.21-orig/tests/misc/cut.pl coreutils-8.21/tests/misc/cut.p | ||||
| -my $mb_locale = $ENV{LOCALE_FR_UTF8};
 | ||||
| +my $mb_locale;
 | ||||
| +# uncommented enable multibyte paths
 | ||||
| +#$mb_locale = $ENV{LOCALE_FR_UTF8};
 | ||||
| +$mb_locale = $ENV{LOCALE_FR_UTF8};
 | ||||
|  ! defined $mb_locale || $mb_locale eq 'none' | ||||
| -  and $mb_locale = 'C';
 | ||||
| + and $mb_locale = 'C';
 | ||||
|   | ||||
|  my $prog = 'cut'; | ||||
|  my $try = "Try '$prog --help' for more information.\n"; | ||||
| @@ -224,6 +226,7 @@
 | ||||
|          my @new_t = @$t; | ||||
|          my $test_name = shift @new_t; | ||||
|   | ||||
| +        next if ($test_name =~ "newline-[12][0-9]");
 | ||||
|          push @new, ["$test_name-mb", @new_t, {ENV => "LC_ALL=$mb_locale"}]; | ||||
|        } | ||||
|      push @Tests, @new; | ||||
| diff -urNp coreutils-8.21-orig/tests/misc/expand.pl coreutils-8.21/tests/misc/expand.pl
 | ||||
| --- coreutils-8.21-orig/tests/misc/expand.pl	2013-01-31 01:46:24.000000000 +0100
 | ||||
| +++ coreutils-8.21/tests/misc/expand.pl	2013-11-27 19:47:58.431538769 +0100
 | ||||
| @ -4353,7 +4361,7 @@ diff -urNp coreutils-8.21-orig/tests/misc/sort-merge.pl coreutils-8.21/tests/mis | ||||
|   | ||||
| +my $mb_locale;
 | ||||
| +# uncommented according to upstream commit enabling multibyte paths
 | ||||
| +#$mb_locale = $ENV{LOCALE_FR_UTF8};
 | ||||
| +$mb_locale = $ENV{LOCALE_FR_UTF8};
 | ||||
| +! defined $mb_locale || $mb_locale eq 'none'
 | ||||
| + and $mb_locale = 'C';
 | ||||
| +
 | ||||
| @ -4392,7 +4400,7 @@ diff -urNp coreutils-8.21-orig/tests/misc/sort-merge.pl coreutils-8.21/tests/mis | ||||
| +            push @new_t, $sub;
 | ||||
| +            push @$t, $sub;
 | ||||
| +          }
 | ||||
| +        next if ($test_name =~ "18g");
 | ||||
| +        next if ($test_name =~ "nmerge-.");
 | ||||
| +        push @new, ["$test_name-mb", @new_t, {ENV => "LC_ALL=$mb_locale"}];
 | ||||
| +      }
 | ||||
| +    push @Tests, @new;
 | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user