diff options
| author | lpsolit%gmail.com <> | 2009-06-29 22:38:18 +0200 |
|---|---|---|
| committer | lpsolit%gmail.com <> | 2009-06-29 22:38:18 +0200 |
| commit | df68aac676998db0789b080a11ccceb4c57faaed (patch) | |
| tree | a7ef4e7c71d5c1b129275c4880b96fa2bab14868 | |
| parent | 1533b97cbe9e2e4adae47d37885476cf4f603cd7 (diff) | |
| download | bugzilla-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.pm | 2 |
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"; |