diff options
-rw-r--r-- | contrib/interface/centaur.ml4 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/interface/centaur.ml4 b/contrib/interface/centaur.ml4 index 78de2fb02..10fcf37f2 100644 --- a/contrib/interface/centaur.ml4 +++ b/contrib/interface/centaur.ml4 @@ -586,7 +586,8 @@ open Vernacentries let pcoq_show_goal = function | Some n -> show_nth n | None -> - if !pcoq_started = Some true (* = debug *) then show_open_subgoals () + if !pcoq_started = Some true (* = debug *) then + msg (Pfedit.pr_open_subgoals ()) else errorlabstrm "show_goal" (str "Show must be followed by an integer in Centaur mode");; |