KevinSchoenmayer/GseTDDUebungKCLR
2
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial Commit

Browse Source
This commit is contained in:
Riley Schneider
2025-12-03 16:38:10 +01:00
parent c5e26bf594
commit b732d8d4b5
17680 changed files with 5977495 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
database/perl/vendor/lib/DBIx/Class/CDBICompat/ReadOnly.pm vendored Normal file
View File

@@ -0,0 +1,14 @@
package # hide from PAUSE
DBIx::Class::CDBICompat::ReadOnly;
use strict;
use warnings;
sub make_read_only {
my $proto = shift;
$proto->add_trigger("before_$_" => sub { shift->throw_exception("$proto is read only") })
foreach qw/create delete update/;
return $proto;
}
1;