c405/dojo
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

en el moras

Browse Source
This commit is contained in:
mynah
2018-07-18 16:04:47 -05:00
parent 4f0061cd7d
commit 5a7566eaf7
21 changed files with 94 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
lib/Dojo/Controller/Home.pm
View File

@@ -101,13 +101,36 @@ sub admin{
if ($c->param("hup")=~/Cambiar/){
$c->dbv->umod($c->param('link'),$c->param('update'));
};
my $v=(load_module("home/admin"))[0];
my ($x,$w)= load_module("home/admin/home");
$c->stash( merge_hash($x,$v) );
$c->stash(apend => ["home/admin/home"]);
$c->stash( map{ $_->{nombre} => $_->{contenido}} @{$c->dbv->mod});
if ($c->param("section")=~/home/){
my $v=(load_module("home/admin"))[0];
my ($x,$w)= load_module("home/admin/home");
$c->stash( merge_hash($x,$v) );
$c->stash(apend => ["home/admin/home"]);
$c->stash( map{ $_->{nombre} => $_->{contenido}} @{$c->dbv->mod});
}
elsif ( $c->param("section")=~/radio/ ){
$c->stash(
merge_hash( (load_module("home/admin"))[0],
merge_hash( (load_module("home/admin/candySwitch"))[0],
(load_module("home/admin/radio"))[0],
)));
$c->stash(apend => ["home/admin/radio","home/admin/candySwitch"]);
$c->stash(%{($c->dbv->radio)->[0]});
$c->stash($Dojo::Conf::radio);
}
elsif ( $c->param("section")=~/event/ ){
}
elsif ( $c->param("section")=~/mensajes/ ){
$c->stash(merge_hash(
(load_module("home/admin"))[0],
(load_module("home/admin/mensajes"))[0]
));
$c->stash(apend => ["home/admin/mensajes"]);
my $h = $c->dbv->rmsg;
$c->stash( h=>$h );
}
}
1;