From 6e2a04dd94aac2c204e330998245b2bdf4871a79 Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Mon, 20 Mar 2023 22:55:49 +0100
Subject: [PATCH] db.pm: support more names

names like "table" or "column" can now be used for column names
---
 lib/calcms/db.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/calcms/db.pm b/lib/calcms/db.pm
index 6f115e0..f31965c 100644
--- a/lib/calcms/db.pm
+++ b/lib/calcms/db.pm
@@ -118,11 +118,11 @@ sub insert ($$$){
     my ($dbh, $table, $entry) =@_;
 
     my @keys = sort keys %$entry;
-    my $keys = join( ",", @keys );
+    my $keys = join( ",", map {"`$table`.`$_`"} @keys );
     my $values = join( ",", map { '?' } @keys );
     my @bind_values = map { $entry->{$_} } @keys;
 
-    my $sql = "insert into $table \n ($keys) \n values  ($values);\n";
+    my $sql = "insert into `$table` \n ($keys) \n values ($values);\n";
     put( $dbh, $sql, \@bind_values );
     my $result = get( $dbh, 'SELECT LAST_INSERT_ID() id;' );
     return $result->[0]->{id} if $result->[0]->{id} > 0;