make-lpath

   1 #!/bin/csh -f
   2
   3 echo "(setq load-path" > loadpath
   4 echo "      (nconc '("'"."' >> loadpath
   5 echo '               "'`pwd`'"' >> loadpath
   6 echo '               "'`(cd ../tl; pwd)`'"' >> loadpath
   7 echo '               "'`(cd ../mel; pwd)`'"' >> loadpath
   8 foreach i ($argv)
   9 echo '               "'$i'"' >> loadpath
  10 end
  11 echo '               ) load-path))' >> loadpath