* tests/misc/base64: Factor a long, repetitive string.

diff --git a/ChangeLog b/ChangeLog
index accd2cb46837aceb39a6cb8e86ecf131f0f679ba..f8f91774562d094678da9889f9534a6901c3564c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2006-12-30  Jim Meyering  <jim@meyering.net>
 
+       * tests/misc/base64: Factor a long, repetitive string.
+
        * src/c99-to-c89.diff: Adjust remove.c offsets.
 
        Clean up after the change of 2006-12-28.

diff --git a/tests/misc/base64 b/tests/misc/base64
index 02591da86695991c4f52398b0136a204c003575d..60332a044a3a7931f3e3105358cb08f87c6a8e72 100755 (executable)
--- a/tests/misc/base64
+++ b/tests/misc/base64
@@ -37,8 +37,7 @@ use strict;
 # Turn off localisation of executable's ouput.
 @ENV{qw(LANGUAGE LANG LC_ALL)} = ('C') x 3;
 
-my $a39 = "YWFhY\nWFhYW\nFhYWF\nhYWFh\nYWFhY\nWFhYW\nFhYWF\n"
-  . "hYWFh\nYWFhY\nWFhYW\nFh";
+(my $a39 = 'YWFh' x 13) =~ s/(.{5})/$1\n/g;
 
 my @Tests =
     (