Agrego el modulito que traduce la sesion de PHP a PERL. Hay que modificarlo en cada...

[mecon/intranet.git] / sistema / www / servicios / agenda / agenda2.php

diff --git a/sistema/www/servicios/agenda/agenda2.php b/sistema/www/servicios/agenda/agenda2.php
index b5d3b715ff3d2d0faef15a4ed2437220393ceef5..c61aa32b93f94699a36f92dffcfc22a3ce34a83f 100644 (file)
--- a/sistema/www/servicios/agenda/agenda2.php
+++ b/sistema/www/servicios/agenda/agenda2.php
@@ -27,8 +27,8 @@ $Id$
 require_once '../../../local_lib/Servicios/Agenda.php';
 require_once 'HTML/Table.php';
 require_once '../../../local_lib/HTML_DietMarco.php';
-require_once 'HTML/Image.php';
-require_once 'HTML/Link.php';
+require_once 'MECON/HTML/Image.php';
+require_once 'MECON/HTML/Link.php';
 require_once 'DB.php';
 //}}}
 //CREO LA CONEXION A LA BASE DE DATOS {{{
@@ -41,17 +41,17 @@ if (DB::isError($DB)) {
 $MARCO     = new HTML_DietMarco('servicios');
 $AGENDA    = new Servicios_Agenda ($DB);
 $TABLA     = new HTML_Table('width="760" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF"');
-$LUPA      = new HTML_Image('../../images/servicios_agenda_lupa.gif');
-$MAIL      = new HTML_Image('../../images/servicios_agenda_mail.gif');
-$TELECO    = new HTML_Image('../../images/servicios_agenda_teleco.gif');
-$INFO      = new HTML_Image('../../images/servicios_agenda_info.gif');
-$NOTAS     = new HTML_Image('../../images/servicios_agenda_notas.gif');
-$V5        = new HTML_Image('../../images/servicios_agenda_v5.gif');
+$LUPA      = new MECON_HTML_Image('../../images/servicios_agenda_lupa.gif');
+$MAIL      = new MECON_HTML_Image('../../images/servicios_agenda_mail.gif');
+$TELECO    = new MECON_HTML_Image('../../images/servicios_agenda_teleco.gif');
+$INFO      = new MECON_HTML_Image('../../images/servicios_agenda_info.gif');
+$NOTAS     = new MECON_HTML_Image('../../images/servicios_agenda_notas.gif');
+$V5        = new MECON_HTML_Image('../../images/servicios_agenda_v5.gif');
 
-$LINK_1    = new HTML_Link('mailto:teleco@mecon.gov.ar', $MAIL);
-$LINK_2    = new HTML_Link('mailto:teleco@mecon.gov.ar', 'Consultas', array(), array ('class' => 'txt2'));
-$LINK_3    = new HTML_Link('agenda1', 'Nueva búsqueda', array(), array ('class' => 'txt2'));
-$LINK_4    = new HTML_Link('mailto:teleco@mecon.gov.ar', 'envíenos su consulta o reclamo');
+$LINK_1    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', $MAIL);
+$LINK_2    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'Consultas', array(), array ('class' => 'txt2'));
+$LINK_3    = new MECON_HTML_Link('agenda1', 'Nueva búsqueda', array(), array ('class' => 'txt2'));
+$LINK_4    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'envíenos su consulta o reclamo');
 //}}}
 //OBTENGO LOS DATOS DE LAS BASES {{{
     if (@$_POST['interno']) { $AGENDA->setInterno($_POST['interno']); }