ACI0103861 fixed

Author: delahaye-4D

Project/Sources/Forms/WP_Palette_Fonts/method.4dm

@@ -3,7 +3,14 @@ var $setupOK : Boolean
 var $typeSelection : Integer
 
 $paletteID:=1
-$typeSelection:=Form:C1466.selection.type
+
+// ACI0103861
+Case of 
+	: (Form:C1466.selection=Null:C1517)
+	: (Value type:C1509(Form:C1466.selection.type)#Is real:K8:4)
+	Else 
+		$typeSelection:=Form:C1466.selection.type
+End case 
 
 Case of 
 	: (Form event code:C388=On Load:K2:1)

Project/Sources/Methods/UI_isProtected.4dm

@@ -21,7 +21,7 @@ If (Not:C34($protected))  // still not protected ?
 		$protected:=Not:C34(Form:C1466.enterable)
 	End if 
 
-	If (Not:C34($protected))  // still not protected ?
+	If (Not:C34($protected)) && (Form:C1466.selection#Null:C1517)  // still not protected ? // ACI0103861
 
 		WP Get attributes:C1345(Form:C1466.selection.owner; wk protection enabled:K81:307; $protectedDoc)  // 1 protection enabled, 0 protection disabled
 		WP Get attributes:C1345(Form:C1466.selection; wk protected:K81:306; $protectedSel)  // 1 protected, 0 not protected, wk mixed= semi protected