Add in generate Stringnames for lex entities and play back into templates

Templates/custom.pm.tem

@@ -56,6 +56,13 @@ our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");
 	}
 </tal:block>
 
+sub create_link{
+	# WIP
+	my ($c,$route, $panel, $index) = shift;
+	my $link = "$route?trt=$panel&Selected=$index";
+	return $link;
+}
+
 1;