roko.li/sharee.bike
5
0
Fork 0
mirror of https://gitlab.com/t6353/sharee.bike.git synced 2025-05-11 22:37:27 +02:00
Code Issues Projects Releases Packages Wiki Activity

App merchant-message

Browse source
This commit is contained in:
ragu 2023-05-15 11:39:26 +02:00
parent 9da4bd0cb0
commit 75a23dc3f4
5 changed files with 40 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

11
copri4/main/src/Mod/Indexsharee.pm
View file

@ -99,7 +99,8 @@ sub handler {
exit 0;
}
my $lang = "de";
my $lang = "en";
$lang = lc($R::lang) if($R::lang);
my $dyn_js = "";
my $users_dms = {};
my $users_sharee = {};
@ -175,10 +176,10 @@ sub handler {
}
if($varenv{dbname} eq $dbt->{primary}->{sharee_primary}->{database}->{dbname}){
$varenv{cms} = $dbt->fetch_cms($dbh,{ lang => $q->escapeHTML($R::lang) });
$varenv{cms} = $dbt->fetch_cms($dbh,{ lang => $q->escapeHTML($lang) });
}else{
my $dbh_primary = $dbt->dbconnect_extern($dbt->{primary}->{sharee_primary}->{database}->{dbname});
$varenv{cms} = $dbt->fetch_cms($dbh_primary,{ lang => $q->escapeHTML($R::lang) });
$varenv{cms} = $dbt->fetch_cms($dbh_primary,{ lang => $q->escapeHTML($lang) });
}
#Save anyway on create ... and hopefully delete it later
@ -792,7 +793,7 @@ sub handler {
$title .= " devel" if($dbt->{copri_conf}->{stage} eq "test");
my $html5 = $q->start_html(-title=>"$title",
-lang=>'de',
-lang=>"$lang",
-onload=>"$onload",
-oncontextmenu=>"$oncontextmenu",
-encoding=>"$html_charset",
@ -837,7 +838,7 @@ sub handler {
);
# CGI.pm doesn't support HTML5 DTD; replace the one it puts in.
$html5 =~ s{<!DOCTYPE.*?>}{<!DOCTYPE html>}s;
$html5 =~ s{<html.*?>}{<html lang='de'>}s;
$html5 =~ s{<html.*?>}{<html lang='$lang'>}s;
print $html5;
print $q->div({-style=>'background-color:black;color:white;'},"<noscript>JavaScript is off. Please enable to view full site.</noscript>"),"\n";