diff options
| -rw-r--r-- | toplevel/vernacentries.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index e5a0681d8f..3185d1f0cb 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -779,7 +779,7 @@ let _ = { optsync = true; optname = "use of boxed values"; optkey = (SecondaryTable ("Boxed","Values")); - optread = Vm.transp_values; + optread = (fun _ -> not (Vm.transp_values ())); optwrite = (fun b -> Vm.set_transp_values (not b)) } let _ = |