Merge pull request #18 from cedricduriau/17-jsongetkeyinput

implement show input control to allow input connection to key

fusion/Fuses/jsonget.fuse

@@ -33,7 +33,18 @@ function Create()
     InKey = self:AddInput("Key", "Key", {
         LINKID_DataType = "Text",
         INPID_InputControl = "TextEditControl",
-        TEC_Lines = 1
+        TEC_Lines = 1,
+        LINK_Main = 2
+    })
+
+    InShowInput = self:AddInput("Show Input", "ShowInput", {
+        LINKID_DataType = "Number",
+        INPID_InputControl = "CheckboxControl",
+        INP_Integer = true,
+        INP_Default = 0.0,
+        INP_External = false,
+        INP_DoNotifyChanged = true,
+        ICD_Width = 0.2
     })
 
     OutText = self:AddOutput("Output" , "Output" , {
@@ -42,6 +53,28 @@ function Create()
     })
 end
 
+function NotifyChanged(inp, param, time)
+    --[[
+        Handles all input control events.
+
+        :param inp: Input that triggered a signal.
+        :type inp: Input
+
+        :param param: Parameter object holding the (new) value.
+        :type param: Parameter
+
+        :param time: Current frame number.
+        :type time: float
+    ]]
+    if inp == InShowInput then
+        if param.Value == 1.0 then
+            InKey:SetAttrs({LINK_Visible = true})
+        else
+            InKey:SetAttrs({LINK_Visible = false})
+        end
+    end
+end
+
 function Process(req)
     -- [[ Creates the output. ]]
     local json_string = InJSON:GetValue(req).Value