FC-3159 disable editing of built-in nav aliases

packages/types/dmNavigation.cfc

@@ -395,6 +395,25 @@
 		<cfreturn stType />
 	</cffunction>
 
+
+	<cffunction name="ftEditlNavIDAlias" access="public" returntype="string" description="This will return a string of formatted HTML text to enable the editing of the property" output="false">
+		<cfargument name="typename" required="true" type="string" hint="The name of the type that this field is part of.">
+		<cfargument name="stObject" required="true" type="struct" hint="The object of the record that this field is part of.">
+		<cfargument name="stMetadata" required="true" type="struct" hint="This is the metadata that is either setup as part of the type.cfc or overridden when calling ft:object by using the stMetadata argument.">
+		<cfargument name="fieldname" required="true" type="string" hint="This is the name that will be used for the form field. It includes the prefix that will be used by ft:processform.">
+
+		<cfset var html = "" />
+		<cfset var oField = application.formtools.field.oFactory>
+
+		<cfif listFindNoCase("hidden,home,root,rubbish", arguments.stObject.lNavIDAlias)>
+			<cfset html = oField.display(argumentCollection=arguments)>
+		<cfelse>
+			<cfset html = oField.edit(argumentCollection=arguments)>
+		</cfif>
+
+		<cfreturn html>
+	</cffunction>
+
 	<cffunction name="ftEditaObjectIDs" access="public" returntype="string" description="This will return a string of formatted HTML text to enable the editing of the property" output="false">
 		<cfargument name="typename" required="true" type="string" hint="The name of the type that this field is part of.">
 		<cfargument name="stObject" required="true" type="struct" hint="The object of the record that this field is part of.">