From: Leandro Lucarella <llucax@gmail.com>
Date: Tue, 22 Jul 2003 22:28:08 +0000 (+0000)
Subject: Se usa el nuevo HTML_Link.
X-Git-Tag: svn_import~223
X-Git-Url: https://git.llucax.com/mecon/intranet.git/commitdiff_plain/415df11d749714d417f706c73753dd42ca2323af

Se usa el nuevo HTML_Link.
---

diff --git a/sistema/www/sistemas.php b/sistema/www/sistemas.php
index 0bebcda..c495164 100644
--- a/sistema/www/sistemas.php
+++ b/sistema/www/sistemas.php
@@ -1,11 +1,12 @@
 <?php
-
+// vim: set binary expandtab ts=4 shiftwidth=4 textwidth=80:
 // $Id$
 
 require_once '../local_lib/HTML_DietMarco.php';
 require_once '../local_lib/intranetdb.php';
 require_once 'MECON/HTML/Arbol/ArbolDB.php';
 require_once 'HTML/Table.php';
+require_once 'HTML/Link.php';
 #require_once 'AI/DB.php';
 require_once 'DB.php';
 require_once 'AI/Sistema.php';
@@ -41,12 +42,27 @@ while ($sistema) {
                         'align'  => 'absmiddle',
                     )
             );
-            $row[] = $img->toHtml().' <A href="'.$sistema->link.'" title="'
-                . $sistema->descripcion.'" target="_blank">'.$sistema->nombre
-                . '</A><BR>' . $sistema->descripcion
-		. ($sistema->link_ayuda
-		    ? (' <A href="'.$sistema->link_ayuda.'" target="_blank" alt="Ayuda">(?)</A>')
-		    : '');
+			$link = new HTML_Link(
+				$sistema->link,
+				$sistema->nombre,
+				array(),
+		    	array(
+				    'title'  => $sistema->descripcion,
+				    'target' => '_blank',
+				)
+		    );
+            $html = $img->toHtml() . $link->toHtml() . '<BR>'
+		        . $sistema->descripcion;
+	    	if ($sistema->link_ayuda) {
+		    	$link = new HTML_Link(
+					$sistema->link_ayuda,
+					'(?)',
+					array(),
+					array('target' => '_blank')
+				);
+				$html .= $link->toHtml();
+			}
+            $row[] = $html;
             $sistema = @array_shift($sistemas);
         } else {
             $row[] = '&nbsp;';