#!/bin/csh -f
-echo "(setq load-path" > .lpath.el
-echo " (nconc '("'"."' >> .lpath.el
-echo ' "'`pwd`'"' >> .lpath.el
-echo ' "'`(cd ../tl; pwd)`'") load-path))' >> .lpath.el
+echo "(setq load-path" > loadpath
+echo " (nconc '("'"."' >> loadpath
+echo ' "'`pwd`'"' >> loadpath
+echo ' "'`(cd ../tl; pwd)`'"' >> loadpath
+echo ' "'`(cd ../mel; pwd)`'"' >> loadpath
+foreach i ($argv)
+echo ' "'$i'"' >> loadpath
+end
+echo ' ) load-path))' >> loadpath