mlinington

try
	tell application "Mail"
		set selectedMsg to selection
		if selectedMsg is {} then
			error "No message selected."
		else
			set messageID to message id of (item 1 of selectedMsg)
			set msgURL to "message://%3C" & messageID & "%3E"
			set the clipboard to msgURL
			--say "Done"