From 74c0404b68ab07ab3be9501e2ab8bb4425d76071 Mon Sep 17 00:00:00 2001 From: Vincent de Lachaux Date: Wed, 3 Jan 2024 14:08:29 +0100 Subject: [PATCH] dependencies --- Project/Sources/Classes/inputDelegate.4dm | 31 ++++++++++++++++++++++- Project/Sources/dependencies.json | 22 ++++++++++++++++ 2 files changed, 52 insertions(+), 1 deletion(-) create mode 100644 Project/Sources/dependencies.json diff --git a/Project/Sources/Classes/inputDelegate.4dm b/Project/Sources/Classes/inputDelegate.4dm index e0b8f58..b3e74a7 100644 --- a/Project/Sources/Classes/inputDelegate.4dm +++ b/Project/Sources/Classes/inputDelegate.4dm @@ -77,8 +77,37 @@ Function set filter($filter) Else - OBJECT SET FILTER:C235(*; This:C1470.name; String:C10($filter)) + $filter:=String:C10($filter) + Case of + + //______________________________________________________ + : ($filter="email") + + OBJECT SET FILTER:C235(*; This:C1470.name; "&\"a-z;0-9;@;.;-;_\"") + + //______________________________________________________ + : ($filter="url") + + OBJECT SET FILTER:C235(*; This:C1470.name; "&\"a-z;0-9;@;.;-;_;:;#;%;/;?;=\"") + + //______________________________________________________ + : ($filter="noSpaceNorCr") + + OBJECT SET FILTER:C235(*; This:C1470.name; "&\"!-ÿ\"") + + //______________________________________________________ + : ($filter="noCr") + + OBJECT SET FILTER:C235(*; This:C1470.name; "&\" -ÿ\"") + + //______________________________________________________ + Else + + OBJECT SET FILTER:C235(*; This:C1470.name; $filter) + + //______________________________________________________ + End case End if // <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== <== diff --git a/Project/Sources/dependencies.json b/Project/Sources/dependencies.json new file mode 100644 index 0000000..8567402 --- /dev/null +++ b/Project/Sources/dependencies.json @@ -0,0 +1,22 @@ +{ + "dependencies": { + "4DPop": {}, + "4DPop AppMaker": {}, + "4DPop Bookmarks": {}, + "4DPop Clipboard": {}, + "4DPop ColorChart": {}, + "4DPop Commands": {}, + "4DPop Constants-Editor": {}, + "4DPop Git": {}, + "4DPop Image-Buddy": {}, + "4DPop KeepIt": {}, + "4DPop Macros": {}, + "4DPop Pasteboard": {}, + "4DPop QuickOpen": {}, + "4DPop Rulers": {}, + "4DPop sqlSchemas": {}, + "4DPop Window": {}, + "4DPop XLIFF-Pro": {} + } +} +