aboutsummaryrefslogtreecommitdiff
path: root/tactics/hints.ml
diff options
context:
space:
mode:
authorThéo Zimmermann2016-10-24 17:35:04 +0200
committerThéo Zimmermann2016-10-25 15:56:33 +0200
commit2d687dec5709695942aa6a92197a5e5e2a91b616 (patch)
treeb94b6613d3896a33c37ce17237f7af0b988c6aa4 /tactics/hints.ml
parent7e38b6627caaab7d19c4fc0ee542a67d9f8970c2 (diff)
Remove v62 from the codebase.
Diffstat (limited to 'tactics/hints.ml')
-rw-r--r--tactics/hints.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/tactics/hints.ml b/tactics/hints.ml
index 89ecc6c0b2..1ebd32c378 100644
--- a/tactics/hints.ml
+++ b/tactics/hints.ml
@@ -657,8 +657,7 @@ let searchtable_add (name,db) =
let current_db_names () = Hintdbmap.domain !searchtable
let current_db () = Hintdbmap.bindings !searchtable
-let current_pure_db () =
- List.map snd (Hintdbmap.bindings (Hintdbmap.remove "v62" !searchtable))
+let current_pure_db () = List.map snd (current_db ())
let error_no_such_hint_database x =
errorlabstrm "Hints" (str "No such Hint database: " ++ str x ++ str ".")