X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c09313030ba77f61771483e69179fd916d9328cd..95a60147c8b2bf2fab66e6e1785708aeebfaccbc:/scripts/rose_auto_create_model.pl

diff --git a/scripts/rose_auto_create_model.pl b/scripts/rose_auto_create_model.pl
index 3331c247e..2e746a6bd 100755
--- a/scripts/rose_auto_create_model.pl
+++ b/scripts/rose_auto_create_model.pl
@@ -120,6 +120,7 @@ CODE
 
   # patch foreign keys
   my $foreign_key_definition = "SL::DB::AUTO::$package"->meta->perl_foreign_keys_definition(%args);
+  $foreign_key_definition =~ s/::AUTO::/::/g;
 
   if ($definition =~ /\Q$foreign_key_definition\E/) {
     my ($start, $end) = ($-[0], $+[0]);