roko.li/sharee.bike
5
0
Fork 0
mirror of https://gitlab.com/t6353/sharee.bike.git synced 2025-05-10 14:06:26 +02:00
Code Issues Projects Releases Packages Wiki Activity

refactoring some methodes

Browse source
This commit is contained in:
ragu 2023-03-05 20:01:47 +01:00
parent 697a29b97d
commit 729dad2be4
28 changed files with 567 additions and 2323 deletions
Download patch file Download diff file Expand all files Collapse all files

8
copri4/shareeweb-project/src/Lib/Mlogic.pm
View file

@ -7,7 +7,7 @@ use Mod::Buttons;
use Mod::Libenzdb;
use Mod::DBtank;
use Data::Dumper;
my $q = new CGI;
my $db = new Libenzdb;
my $dbt = new DBtank;
my $but = new Buttons;
@ -22,12 +22,14 @@ sub new {
#Template
sub tpl(){
my $self = shift;
my $q = shift;
my $node_meta = shift;
my $users_dms = shift;
my $mode = shift || "";
my $varenv = shift;
my $users_sharee = shift || "";
my $feedb = shift || "";
$q->import_names('R');
my $user_agent = $q->user_agent();
@ -190,7 +192,7 @@ sub tpl(){
require "Tpl/Karte_osm.pm";
&Karte_osm::tpl($node_meta,$users_dms,$mode,$varenv,$users_sharee,$feedb);
}else{
$self->tplselect($node_meta,$users_dms,$mode,$varenv,$users_sharee,$feedb);
$self->tplselect($q,$node_meta,$users_dms,$mode,$varenv,$users_sharee,$feedb);
}
if($project ne "Freiburg"){
@ -270,12 +272,14 @@ EOF
#2021-05-05 changed to Mlogic
sub tplselect(){
my $self = shift;
my $q = shift;
my $node_meta = shift;
my $users_dms = shift || "";
my $mode = shift || "";
my $varenv = shift;
my $users_sharee = shift || "";
my $feedb = shift || "";
$q->import_names('R');
my $lang = "de";
my $tpl_id = $node_meta->{tpl_id};