src/Tools/jEdit/src/session_dockable.scala
changeset 44775 27930cf6f0f7
parent 44734 7313e2db3d39
child 44776 47e8c8daccae
     1.1 --- a/src/Tools/jEdit/src/session_dockable.scala	Wed Sep 07 09:10:41 2011 +0200
     1.2 +++ b/src/Tools/jEdit/src/session_dockable.scala	Wed Sep 07 11:00:39 2011 +0200
     1.3 @@ -61,13 +61,19 @@
     1.4    session_phase.border = new SoftBevelBorder(BevelBorder.LOWERED)
     1.5    session_phase.tooltip = "Prover status"
     1.6  
     1.7 +  private val cancel = new Button("Cancel") {
     1.8 +    reactions += { case ButtonClicked(_) => Isabelle.session.cancel_execution }
     1.9 +  }
    1.10 +  cancel.tooltip = "Cancel current proof checking process"
    1.11 +
    1.12    private val logic = Isabelle.logic_selector(Isabelle.Property("logic"))
    1.13    logic.listenTo(logic.selection)
    1.14    logic.reactions += {
    1.15      case SelectionChanged(_) => Isabelle.Property("logic") = logic.selection.item.name
    1.16    }
    1.17  
    1.18 -  private val controls = new FlowPanel(FlowPanel.Alignment.Right)(session_phase, logic)
    1.19 +  private val controls =
    1.20 +    new FlowPanel(FlowPanel.Alignment.Right)(session_phase, cancel, logic)
    1.21    add(controls.peer, BorderLayout.NORTH)
    1.22  
    1.23