echo "pselect() {" > pselect.mnu
echo " Xdialog --title 'BashPodder GUI' --menu 'Podcast Selection' 30 100 10 \\" >> pselect.mnu
while read conf
	do
	title=$(lynx -source $conf | tr '\r' '\n' | tr \' \" | sed -n 's/.*<title>\([^">]*\)<\/title>.*/\1/p' | head -n1)
	if [ "$title" == "" ]
		then
		title=$conf
	fi
	echo "\"$title\" \"$conf\" \\" >> pselect.mnu
	done < bp.conf
echo "" >> pselect.mnu
echo "}" >> pselect.mnu