#!/usr/bin/perl
BEGIN { push @INC,"/home/content/b/i/c/biciperro/html/org"; }
#
#

use programa;
use biciperros;
require "calendario/2008.pl";


%fotos=(
	"$image_site/acolman.jpg",
	"$image_site/amecameca.jpg",
	"$image_site/centro.jpg",
	"$image_site/mixquic.jpg",
	"$image_site/rio_frio.jpg",
	"$image_site/0t3.jpg",
	"$image_site/1t3.jpg",
	"$image_site/2t2.jpg",
	"$image_site/tetela.jpg",
	"$image_site/tlacotepec.jpg",
	"$image_site/xochimilco.jpg",
	"$image_site/zocalo-2.jpg",
	);
#poner fotos landscape solo...
#&set_fotos("Los Paseos",%fotos);
&init_programa($primer_domingo,@paseos2008);
 
$extra_text="";

if (defined %extras){
 @keys = keys(%extras);
 $extra_text.="Actividades fuera de programa 2008:<ul>";
 foreach $key (@keys){
    $extra_text.="<li>$key --> $extras{$key}</li>";
 }
 $extra_text.="</ul>";
}

    


$description=
$ExplicacionColores . "
<p>$kilometrajes
<p>$historia
<p>$ef
<p>La revista <i>La Bicicleta</i> publica cada aņo el programa anual del Grupo Bicicletero del Parque Hundido <a href=http://www.labicicleta.org/modules.php?name=News&file=article&sid=142>Leer mas...</a> en http://www.labicicleta.org/.
";


&start_init($title,$html_title,$keywords,$description,$extra_text,"Programa de paseos en bicicleta del Grupo Bicicletero del Parque Hundido");
&print_paseos($primer_domingo,@paseos2008);
&end_init($title,$html_title,$keywords,$description);

exit(1);