fixed clean_insp form write event behavior to match OI 9
This commit is contained in:
parent
9c5c01ce24
commit
4704ef828f
@ -716,17 +716,17 @@ RETURN
|
||||
* * * * * * *
|
||||
Write:
|
||||
* * * * * * *
|
||||
|
||||
|
||||
DontClose = Get_Property(@WINDOW,'@DONT_CLOSE')
|
||||
|
||||
IF NOT(DontClose) THEN
|
||||
Forward_Event()
|
||||
Post_Event(@WINDOW,'CLOSE')
|
||||
END ELSE
|
||||
Set_Property(@WINDOW,'@DONT_CLOSE',0)
|
||||
Result = 1
|
||||
END
|
||||
|
||||
Result = 1
|
||||
|
||||
RETURN
|
||||
|
||||
|
||||
@ -1961,10 +1961,3 @@ RETURN
|
||||
SetGroupBackground:
|
||||
* * * * * * *
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user