window:
	res:
		windowType	wstandard
	endres:
endwindow:
close:
	res:
		bitmapPath	$(bitmaps)
		bitmapFile	CLOSE::CBM
	endres:
endclose:
title:
	res:
		leftLabel	ʏ̂̃AhXO|v\
		leftKanjiFont	$(kanjiFont)
		leftFont	$(kanaFont)
		switch $(COLOR)
			case MONO:
				bitmapPath	$(bitmaps)
				backgroundFile	GRAY3
				transparent	false
				break
		endswitch
	endres:
endtitle:
dialog: dialogs
	res:
		defaultDistance		#(fWidth)
		dialogType		modeless
		defaultButton		next_alias		
	endres:
	ditem: name_label
		res:
			itemType	bitmap
			leftLabel	ʏ
			leftKanjiFont	$(kanjiFont)
			leftFont	$(kanaFont)
			vertDistance	#(fWidth)
			horizDistance	#(fWidth)
		endres:
	endditem:
	ditem: name
		res:
			itemType	bitmap
			fromVert	name_label
			leftKanjiFont	$(kanjiFont)
			leftFont	$(kanaFont)
			vertDistance	#(fWidth)
			horizDistance	#(fWidth)
			leftLabel	'                                '
			borderWidth	1
		endres:
	endditem:
	ditem: alias_label
		res:
			itemType	bitmap
			fromVert	name
			label		AhXO|v
			kanjiFont	$(kanjiFont)
			font		$(kanaFont)
			vertDistance	#(fWidth)*2
			horizDistance	#(fWidth)
		endres:
	endditem:
	ditem: alias_list
		res:
			itemType	viewtext
			fromVert	alias_label
			width		#(fWidth)+1*32
			height		#(lHeight)*10+8
			vertDistance	#(fWidth)
			horizDistance	#(fWidth)
			length		998
			kanjiFont	$(kanjiFont)
			font		$(kanaFont)
			file		/dev/null
		endres:
	endditem:
enddialog:
proc: pre
	$(TMP) = mktemp
	put /tmp/$(TMP) $(alias)
endproc:
proc: close
	job off
	close
endproc:
proc: off
	rm -f $(alias)
endproc:
proc: open
	$(etc)/Mail/Salias.sh init $(alias_name) > $(alias)
	setval name leftLabel $(alias_name)
	setval alias_list file $(alias)
endproc:
