From d883a88e2e159318c97fdfb8b7d8cdf939e58940 Mon Sep 17 00:00:00 2001
From: Regis Houssin <regis@dolibarr.fr>
Date: Sat, 3 Apr 2010 23:53:44 +0000
Subject: [PATCH] Fix: upgrade problem

---
 build/perl/virtualmin/dolibarr.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/build/perl/virtualmin/dolibarr.pl b/build/perl/virtualmin/dolibarr.pl
index 9d1b58c1ba6..58be286ee72 100644
--- a/build/perl/virtualmin/dolibarr.pl
+++ b/build/perl/virtualmin/dolibarr.pl
@@ -179,10 +179,10 @@ local $olddocdir = &transname();
 local $url;
 $path = &script_path_url($d, $opts);
 if ($path =~ /^https:/) {
-        $url = "https://www.$d->{'dom'}";
+        $url = "https://$d->{'dom'}";
 }
 else {
-        $url = "http://www.$d->{'dom'}";
+        $url = "http://$d->{'dom'}";
 }
 if ($opts->{'path'} =~ /\w/) {
 	$url .= $opts->{'path'};