From 1c448834fa5a8ae65246938f2b82f7f00c8eb3ab Mon Sep 17 00:00:00 2001
From: Laurent Destailleur <eldy@users.sourceforge.net>
Date: Sat, 14 Feb 2004 17:08:57 +0000
Subject: [PATCH] =?UTF-8?q?N'affiche=20pas=20la=20valeur=20de=20l'url=20de?=
 =?UTF-8?q?=20la=20soci=E9t=E9=20si=20elle=20n'est=20pas=20d=E9fini,=20sin?=
 =?UTF-8?q?on=20on=20obtien=20un=20lien=20"http://"=20sans=20path=20d'affi?=
 =?UTF-8?q?ch=E9.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 htdocs/soc.php | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/htdocs/soc.php b/htdocs/soc.php
index a84ec5262df..555cc6b2a49 100644
--- a/htdocs/soc.php
+++ b/htdocs/soc.php
@@ -175,7 +175,9 @@ elseif ($action == 'edit')
       
       print '<tr><td>Téléphone</td><td><input type="text" name="tel" value="'.$soc->tel.'"></td>';
       print '<td>Fax</td><td><input type="text" name="fax" value="'.$soc->fax.'"></td></tr>';
-      print '<tr><td>Web</td><td colspan="3">http://<input type="text" name="url" size="40" value="'.$soc->url.'"></td></tr>';
+      print '<tr><td>Web</td><td colspan="3">';
+      if ($soc->url && ! ereg("http:\/\/",$soc->url)) { print 'http://'; }
+      print '<input type="text" name="url" size="40" value="'.$soc->url.'"></td></tr>';
       
       print '<tr><td>Siren</td><td><input type="text" name="siren" size="10" maxlength="9" value="'.$soc->siren.'"></td>';
       print '<td>Siret</td><td><input type="text" name="siret" size="15" maxlength="14" value="'.$soc->siret.'"></td></tr>';
@@ -291,7 +293,9 @@ else
   
   print '<tr><td>Tel</td><td>'.$soc->tel.'</td>';
   print '<td>Fax</td><td>'.$soc->fax.'</td></tr>';
-  print '<tr><td>Web</td><td colspan="3"><a href="http://'.$soc->url.'">http://'.$soc->url.'</a></td></tr>';
+  print '<tr><td>Web</td><td colspan="3">';
+  if ($soc->url) { print '<a href="http://'.$soc->url.'">http://'.$soc->url.'</a>'; }
+  print '</td></tr>';
   
   print '<tr><td>Siren</td><td><a target="_blank" href="http://www.societe.com/cgi-bin/recherche?rncs='.$soc->siren.'">'.$soc->siren.'</a>&nbsp;</td>';