remove (cd) in (ph-project-open): we provide a full path for (find-file) anyway