use File::Spec;

our $BasePath = File::Spec->rel2abs ("../../");
open  FD,">../../.revision";
print FD "4711\n";
close FD;

