aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/coqide_ui.ml
diff options
context:
space:
mode:
Diffstat (limited to 'ide/coqide_ui.ml')
-rw-r--r--ide/coqide_ui.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/ide/coqide_ui.ml b/ide/coqide_ui.ml
index 0ea018fc4..d3543cf2c 100644
--- a/ide/coqide_ui.ml
+++ b/ide/coqide_ui.ml
@@ -38,7 +38,7 @@ let init () =
<menuitem action='Ps' />
</menu>
<menuitem action='Rehighlight' />
- <menuitem action='Quit' />
+ %s
</menu>
<menu name='Edit' action='Edit'>
<menuitem action='Undo' />
@@ -144,6 +144,7 @@ let init () =
<toolitem action='Wizard' />
</toolbar>
</ui>"
+ (if Gdk.Windowing.platform <> `QUARTZ then "<menuitem action='Quit' />" else "")
(Buffer.contents (list_items "Tactic" Coq_commands.tactics))
(Buffer.contents (list_items "Template" Coq_commands.commands))
in