Corretta autosistemazione di prefix.txt

git-svn-id: svn://10.65.10.50/trunk@716 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-12-02 13:08:53 +00:00
parent 1962a5f4c7
commit 7876c36981

View File

@ -29,10 +29,12 @@ TPrefix::TPrefix()
_rdir = rdir; _rdir = rdir;
CGetPref(); CGetPref();
const long primaditta = atol(cprefix); const TFilename dir(cprefix);
const long primaditta = atol(dir.name());
if (primaditta > 0 && !exist(primaditta)) if (primaditta > 0 && !exist(primaditta))
{ {
ofstream out_pr("prefix.txt"); ofstream out_pr(prefname());
out_pr << "com" << endl; out_pr << "com" << endl;
} }
} }