split curl and libcurl into two strings in the initial display
authorDaniel Stenberg <daniel@haxx.se>
Thu, 26 Apr 2001 08:32:12 +0000 (08:32 +0000)
committerDaniel Stenberg <daniel@haxx.se>
Thu, 26 Apr 2001 08:32:12 +0000 (08:32 +0000)
tests/runtests.pl

index 7249f8b..ff7fdbb 100755 (executable)
@@ -372,11 +372,19 @@ sub displaydata {
     unlink($memdump); # remove this if there was one left
 
     my $version=`$CURL -V`;
+    chomp $version;
+
+    my $curl = $version;
+
+    $curl =~ s/^(.*)(libcurl.*)/$1/g;
+    my $libcurl = $2;
+
     my $hostname=`hostname`;
     my $hosttype=`uname -a`;
 
     print "********* System characteristics ******** \n",
-    "* $version",
+    "* $curl\n",
+    "* $libcurl\n",
     "* Host: $hostname",
     "* System: $hosttype";