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

Tariff refactoring init

Browse source
This commit is contained in:
Rainer Gümpelein 2022-04-12 11:21:19 +02:00
parent 9c0e5f78e8
commit 75c38a8721
16 changed files with 243 additions and 78 deletions
Download patch file Download diff file Expand all files Collapse all files

4
copri4/shareedms-operator/src/Lib/Mlogic.pm
View file

@ -58,7 +58,7 @@ sub tpl(){
my $title = "";
$title .= $dbt->{primary}->{$varenv->{dbname}}->{title} if($dbt->{primary}->{$varenv->{dbname}}->{title});
$title .= $dbt->{operator}->{$varenv->{dbname}}->{title} if($dbt->{operator}->{$varenv->{dbname}}->{title});
$title .= " " . $dbt->{operator}->{$varenv->{dbname}}->{oprefix} if($dbt->{operator}->{$varenv->{dbname}}->{oprefix});
$title .= " | " . $dbt->{operator}->{$varenv->{dbname}}->{oprefix} if($dbt->{operator}->{$varenv->{dbname}}->{oprefix});
$title .= $dbt->{website}->{$varenv->{syshost}}->{title} if($dbt->{website}->{$varenv->{syshost}}->{title});
$title .= " (devel $varenv->{dbname})" if($dbt->{copri_conf}->{stage} eq "test");
@ -113,7 +113,7 @@ sub tpl(){
print "<div class='form-group'>\n";
#Login
print $q->div({-class=>'content2'}, "Zugang zum $title"),"\n";
print $q->div({-class=>'content2', -nowrap=>1}, $q->img({ -style=>"height:25px",-src=>"$varenv->{head_logo}"}),"Operator Login – $title"),"\n";
print $q->div({-style=>'color:#c83434'},"Login failure"),"\n" if("$R::login_dms" eq "Login" && !$users_dms->{u_id});
print $q->label({-for=>'Userid'},""),"\n";
print $q->textfield(-class=>'form-control', -name=>'user_id', -value=>'', -override=>1, -type=>'email',-class=>'form-control', -id=>'Userid', -placeholder=>'NutzerIn', -required=>1, -autofocus=>1),"\n";