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

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

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

@ -139,12 +139,12 @@ sub create_account(){
#sharee save_account is always done on primary first
sub save_account(){
my $self = shift;
my $q = shift;
my $c_id = shift;
my $varmerch = shift || "";
my $owner = shift || 0;
my $feedb = { message => "" };
my $table = "contentadr";
$q = new CGI;
$q->import_names('R');
my @keywords = $q->param;
@ -580,12 +580,12 @@ sub save_account(){
#insert/save/delete DMS users
sub manage_dmsusers {
my $self = shift;
my $q = shift;
my $base_edit = shift;
my $u_id = shift;
my $users_dms = shift || {};
my $owner = $users_dms->{u_id} || 0;
my $table = "users";
$q = new CGI;
$q->import_names('R');
my @keywords = $q->param;
@ -647,9 +647,10 @@ sub manage_dmsusers {
#coupon alias Gutschein
sub save_transact(){
my $self = shift;
my ($c_id,$coo,$owner) = @_;
$q = new CGI;
my $q = shift;
my $c_id = shift || "";
my $coo = shift || "";
my $owner = shift || "";
$q->import_names('R');
my @keywords = $q->param;