8
0
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-01-22 19:23:02 +01:00

Fixed #7456 - Impossible drop function in package with name of PSQL-function.

Regression introduced in 43574d1588.
This commit is contained in:
Adriano dos Santos Fernandes 2023-01-23 08:09:36 -03:00
parent 9f37b29f77
commit 69faf322d2

View File

@ -2106,6 +2106,10 @@ bool VIO_erase(thread_db* tdbb, record_param* rpb, jrd_tra* transaction)
case rel_funs:
protect_system_table_delupd(tdbb, relation, "DELETE");
EVL_field(0, rpb->rpb_record, f_fun_name, &desc);
if (EVL_field(0, rpb->rpb_record, f_fun_pkg_name, &desc2))
MOV_get_metaname(tdbb, &desc2, package_name);
EVL_field(0, rpb->rpb_record, f_fun_id, &desc2);
id = MOV_get_long(tdbb, &desc2, 0);