=== modified file 'src/mkProjectInfo.ml'
--- src/mkProjectInfo.ml	2009-05-05 17:42:42 +0000
+++ src/mkProjectInfo.ml	2009-05-06 19:10:13 +0000
@@ -66,7 +66,7 @@
 let extract_int re str = int_of_string (extract_str re str);;
 
 let revisionString = "$Rev$";;
-let pointVersion = if String.length revisionString > 5
+let pointVersion = if not (Sys.file_exists "../.bzr")
 then Scanf.sscanf revisionString "$Rev: %d " (fun x -> x) - pointVersionOrigin
 else (* Determining the pointVersionOrigin in bzr is kind of tricky:
         - The mentioned revision number might not be part of this branch