more derived actions, according to jEdit/org/gjt/sp/jedit/gui/DockableWindowFactory.java;
authorwenzelm
Sat, 16 Sep 2017 17:25:51 +0200
changeset 66670 e5188cb1c3d8
parent 66669 bbcb75c58086
child 66671 41b64e53b6a1
more derived actions, according to jEdit/org/gjt/sp/jedit/gui/DockableWindowFactory.java;
src/Pure/Tools/jedit.ML
--- a/src/Pure/Tools/jedit.ML	Sat Sep 16 16:19:34 2017 +0200
+++ b/src/Pure/Tools/jedit.ML	Sat Sep 16 17:25:51 2017 +0200
@@ -32,7 +32,8 @@
   Lazy.lazy (fn () =>
     (case XML.parse (File.read \<^file>\<open>~~/src/Tools/jEdit/src/dockables.xml\<close>) of
       XML.Elem (("DOCKABLES", _), body) => maps (parse_named "DOCKABLE") body
-    | _ => []));
+    | _ => [])
+    |> maps (fn a => [a, a ^ "-toggle", a ^ "-float"]));
 
 val jedit_actions =
   Lazy.lazy (fn () =>