diff options
| author | Théo Zimmermann | 2019-05-23 15:10:20 +0200 |
|---|---|---|
| committer | Théo Zimmermann | 2019-05-23 15:10:20 +0200 |
| commit | e7628797fc241a4d7a5c1a5675cb679db282050d (patch) | |
| tree | 8e8cc4348dfb9247713f45a7c43668ba98c708cf /ide/protocol/xmlprotocol.ml | |
| parent | cf3b9eca0b3e81a7d56acded394a8b6843a4bb8d (diff) | |
| parent | 467eb67bb960c15e1335f375af29b4121ac5262b (diff) | |
Merge PR #10221: Fixing typos - Part 2 (reopening of #10218)
Diffstat (limited to 'ide/protocol/xmlprotocol.ml')
| -rw-r--r-- | ide/protocol/xmlprotocol.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/protocol/xmlprotocol.ml b/ide/protocol/xmlprotocol.ml index e18219210f..5b37ca35ed 100644 --- a/ide/protocol/xmlprotocol.ml +++ b/ide/protocol/xmlprotocol.ml @@ -405,7 +405,7 @@ end = struct | (lg, rg) :: l -> Printf.sprintf "%i:%a" (List.length lg + List.length rg) pr_focus l in - Printf.sprintf "Still focussed: [%a]." pr_focus g.bg_goals + Printf.sprintf "Still focused: [%a]." pr_focus g.bg_goals else let pr_goal { goal_hyp = hyps; goal_ccl = goal } = "[" ^ String.concat "; " (List.map Pp.string_of_ppcmds hyps) ^ " |- " ^ |