summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorlpsolit%gmail.com <>2009-06-29 22:38:18 +0200
committerlpsolit%gmail.com <>2009-06-29 22:38:18 +0200
commitdf68aac676998db0789b080a11ccceb4c57faaed (patch)
treea7ef4e7c71d5c1b129275c4880b96fa2bab14868
parent1533b97cbe9e2e4adae47d37885476cf4f603cd7 (diff)
downloadbugzilla-df68aac676998db0789b080a11ccceb4c57faaed.tar.gz
bugzilla-df68aac676998db0789b080a11ccceb4c57faaed.tar.xz
Bug 500350: [Oracle] Use of uninitialized value in pattern match (m//) at Bugzilla/DB/Schema/Oracle.pm line 149 - Patch by Xiaoou <xiaoou.wu@oracle.com> r/a=mkanat
-rw-r--r--Bugzilla/DB/Schema/Oracle.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Bugzilla/DB/Schema/Oracle.pm b/Bugzilla/DB/Schema/Oracle.pm
index d8b24e49b..615987b06 100644
--- a/Bugzilla/DB/Schema/Oracle.pm
+++ b/Bugzilla/DB/Schema/Oracle.pm
@@ -146,7 +146,7 @@ sub get_fk_ddl {
my $fk_name = $self->_get_fk_name($table, $column, $references);
# 'ON DELETE RESTRICT' is enabled by default
- $delete = "" if ($delete =~ /RESTRICT/i);
+ $delete = "" if ( defined $delete && $delete =~ /RESTRICT/i);
my $fk_string = "\n CONSTRAINT $fk_name FOREIGN KEY ($column)\n"
. " REFERENCES $to_table($to_column)\n";