Alexandre Julliard : winetest: Properly format the new URL field.
Alexandre Julliard
julliard at winehq.org
Tue Nov 23 10:53:11 CST 2010
Module: tools
Branch: master
Commit: f675b2738fb9a0d215d02d9cfd035cb8e83f13ff
URL: http://source.winehq.org/git/tools.git/?a=commit;h=f675b2738fb9a0d215d02d9cfd035cb8e83f13ff
Author: Alexandre Julliard <julliard at winehq.org>
Date: Tue Nov 23 17:46:07 2010 +0100
winetest: Properly format the new URL field.
---
winetest/dissect | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/winetest/dissect b/winetest/dissect
index 83254fe..00edcc5 100755
--- a/winetest/dissect
+++ b/winetest/dissect
@@ -129,7 +129,11 @@ my ($wine, $wine_build, $version, $major, $minor, $plid, $product);
$box->{data} .= "<h2>Operating system version</h2>\n";
$box->{data} .= "<table class=\"output\">\n";
while (($_ = <IN>) =~ /^\s*([0-9a-zA-Z ]+)=(.*?)\r?$/) {
- $box->{data} .= sprintf "<tr><td>$1</td><td>%s</td></tr>\n", escapeHTML($2);
+ if ($1 eq "URL") {
+ $box->{data} .= sprintf "<tr><td>$1</td><td><a href=\"%s\">%s</a></td></tr>\n", escapeHTML($2), escapeHTML($2);
+ } else {
+ $box->{data} .= sprintf "<tr><td>$1</td><td>%s</td></tr>\n", escapeHTML($2);
+ }
if ($1 eq "bRunningUnderWine") {
$wine = $2;
} elsif ($1 eq "dwMajorVersion") {
More information about the wine-cvs
mailing list