# A connector that's the first one of a domain cannot be joined. 
# When joining connectors, if you get a messae that the cons you've selected can't be joined,
# try running this script to check if this is the reason.
# 
# Another way to code this would be to allow the user to select a connector, get the list of 
# doms the connector is a part of, and check for each of those if this con is the first#

package require PWI_Glyph 2.17.3

#select domains for which first con is to be listed
set conMask [pw::Display createSelectionMask -requireDomain [list] ]
pw::Display selectEntities \
      -description "Select the domains you want to list the 1st con of" \
      -selectionmask $conMask selection
set doms $selection(Domains)

foreach dom $doms {
	#get the first edge
	set thisEdge [$dom getEdge 1]

	#get the first con
	set thisCon [$thisEdge getConnector 1]

	#print its name
	puts [ format "First connector of domain %s is %s" [$dom getName] [ $thisCon getName] ]
}