]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/gTopLevel/invokeTactics.ml
...
[helm.git] / helm / gTopLevel / invokeTactics.ml
index 5e75b5b2d9647d057f20e64aabbe1df031f1d516..d7e71177d5c524904548e6bb3a70d7a0d90ebde5 100644 (file)
@@ -319,7 +319,7 @@ module Make(C:Callbacks) =
      match scratch_window#sequent_viewer#get_selected_terms with
         [] ->
          C.output_html
-          ("<h1 color=\"red\">No term selected</h1>")
+          ("<h1 color=\"red\">No terms selected</h1>")
       | terms ->
          try
           let expr = tactic terms scratch_window#term in