From 00166624a85afdbe24722c7e2e3320316cfbae93 Mon Sep 17 00:00:00 2001 From: Kaarle Ritvanen Date: Fri, 28 Jun 2013 07:00:01 +0300 Subject: prevent deletion of objects referred to by other objects --- acf/model/init.lua | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'acf/model/init.lua') diff --git a/acf/model/init.lua b/acf/model/init.lua index a53cc0d..e1a4dd9 100644 --- a/acf/model/init.lua +++ b/acf/model/init.lua @@ -114,6 +114,14 @@ function Reference:_validate(context, value) return value end +function Reference:deleted(context, addr) + local target = self:load(context) + if target and node.addr(target) == addr then + -- TODO raise error for the target object + raise(context.path, 'Refers to '..addr) + end +end + Model = fld.Model -- cgit v1.2.3