--- trunk/t/3-normalize.t	2007/10/30 23:36:49	922
+++ trunk/t/3-normalize.t	2007/10/31 00:26:43	923
@@ -2,7 +2,7 @@
 
 use strict;
 
-use Test::More tests => 341;
+use Test::More tests => 347;
 use Test::Exception;
 use Cwd qw/abs_path/;
 use blib;
@@ -437,6 +437,11 @@
 	test_check_ds('display');
 
 	_clean_ds();
+	test_s(qq{ sorted('something', '42'); });
+	test_s(qq{ sorted('empty', ''); });
+	test_check_ds('sorted');
+
+	_clean_ds();
 	my $n = read_file( "$abs_path/data/normalize.pl" );
 	$n .= "\n1;\n";
 	#diag "normalize code:\n$n\n";