\n"; /* I hope this is enough to prevent access outside cwd */ if (substr($filename,0,1)=="." or substr($filename,0,1)=="/" or substr($filename,0,1)=="~") { print "Sorry, can't show you that file!\n"; } elseif (substr($filename,-3)==".el") { elisp_markup($filename,"fileshow.phtml"); } else { outline_markup($filename,"fileshow.phtml",$expanded); } print "\n"; print "

---

"; click_to_go_back(); footer(); ?>