···1+--- a/version.ml 2018-09-08 15:56:18.919154257 +0200
2++++ b/version.ml 2018-09-08 15:56:07.544028575 +0200
3+@@ -24,16 +24,6 @@
4+5+ let run () =
6+ let bdb_version = Bdb.version () in
7+- let dbstats_dir =
8+- let split = Str.regexp_string "." in
9+- let major_minor_string major minor =
10+- sprintf "Further details about the BDB environment can be seen by \
11+- executing\ndb%s.%s_stat -x in the KDB and Ptree directories\n" major minor
12+- in
13+- match Str.split split bdb_version with
14+- | major :: minor :: _ -> major_minor_string major minor
15+- | [] | _ :: [] -> major_minor_string "X" "Y"
16+- in
17+ printf "SKS version %s%s\n"
18+ Common.version Common.version_suffix;
19+20+@@ -44,5 +34,6 @@
21+ requirement for recon of SKS %s\n"
22+ Common.compatible_version_string;
23+24+- printf "%s" dbstats_dir
25++ printf "Further details about the BDB environment can be seen by executing\n\
26++ db_stat -x in the KDB and PTree directories\n"
27+