reload () {
	. $Ourmlrc
}
mytidy() {
	tidy  -imq -xml $1	
}
next() {
	Who=$USER
	Whats=$*
	[ -z "$Whats" ] && Whats=misc
	Pre="&&what="
	for X in $Whats; do
		What=$Pre$What$Sep$X
		Sep=","
		Pre=""
	done
	Here=`pwd`
	Here=`basename $Here`
	Com="wget  -q -O - 'http://menzies.us/p/apropos.php?who=$Who&&where=$Here$What'"
	eval $Com | sed 's/^/       /'
}
mytidy() {
	tidy -qim -xml $1
}
mytidies() {
	for i in *.xml; do
		mytidy $i
    done
}
items() {
cat <<EOF
<?xml version="1.0"?>
	
<items>
	
		`item $*`
	
</items>
	
	
EOF
}
item() {
cat<<EOF

	<item>
		<title>
			TITLE
		</title>
	`next $*`
		<description>
			<![CDATA[
				DESCRIPTION
			]]>
		</description>
	</item>


EOF
}
doc() {
cat<<EOF
	
	<item> 
		<title>
			TITLE
		</title>
	`next $*`
		<who>
			AUTHOR
		</who>
		<when>
			WHEN
		</when>
		<where>
			WHERE
		</where>
	</item>


EOF
}
export PS1="OURML \e[7m\w\e[27m \!$ "