#!/bin/csh -f

echo "(setq load-path" > .lpath.el
echo "      (nconc '("'"."' >> .lpath.el
echo '               "'`pwd`'"' >> .lpath.el
echo '               "'`(cd ../tl; pwd)`'"' >> .lpath.el
foreach i ($argv)
echo '               "'$i'"' >> .lpath.el
end
echo '               ) load-path))' >> .lpath.el