/* Title: Tools/jEdit/src/symbols_dockable.scala
Author: Fabian Immler
Dockable window for Symbol Palette.
*/
package isabelle.jedit
import isabelle._
import java.awt.Font
import scala.swing.event.ValueChanged
import scala.swing.{Action, Button, TabbedPane, TextField, BorderPanel, Label, ScrollPane}
import org.gjt.sp.jedit.View
class Symbols_Dockable(view: View, position: String) extends Dockable(view, position)
{
val searchspace =
for ((group, symbols) <- Symbol.groups; sym <- symbols)
yield (sym, Library.lowercase(sym))
private class Symbol_Component(val symbol: String) extends Button
{
private val decoded = Symbol.decode(symbol)
private val font_size = Font_Info.main_size(PIDE.options.real("jedit_font_scale")).round
font =
Symbol.fonts.get(symbol) match {
case None => Isabelle_Font(size = font_size)
case Some(font_family) => Isabelle_Font(family = font_family, size = font_size)
}
action =
Action(decoded) {
val text_area = view.getTextArea
if (Token_Markup.is_control_style(decoded))
Token_Markup.edit_control_style(text_area, decoded)
else text_area.setSelectedText(decoded)
text_area.requestFocus
}
tooltip = GUI.tooltip_lines(symbol :: Symbol.abbrevs.get_list(symbol).map(a => "abbrev: " + a))
}
private class Reset_Component extends Button
{
action = Action("Reset") {
val text_area = view.getTextArea
Token_Markup.edit_control_style(text_area, "")
text_area.requestFocus
}
tooltip = "Reset control symbols within text"
}
val group_tabs: TabbedPane = new TabbedPane {
pages ++=
Symbol.groups map { case (group, symbols) =>
new TabbedPane.Page(group,
new ScrollPane(new Wrap_Panel {
contents ++= symbols.map(new Symbol_Component(_))
if (group == "control") contents += new Reset_Component
}), null)
}
pages += new TabbedPane.Page("search", new BorderPanel {
val search = new TextField(10)
val results_panel = new Wrap_Panel
add(search, BorderPanel.Position.North)
add(new ScrollPane(results_panel), BorderPanel.Position.Center)
listenTo(search)
val delay_search =
Swing_Thread.delay_last(PIDE.options.seconds("editor_input_delay")) {
val max_results = PIDE.options.int("jedit_symbols_search_limit") max 0
results_panel.contents.clear
val results =
(searchspace filter
(Library.lowercase(search.text).split("\\s+") forall _._2.contains)
take (max_results + 1)).toList
for ((sym, _) <- results)
results_panel.contents += new Symbol_Component(sym)
if (results.length > max_results) results_panel.contents += new Label("...")
revalidate
repaint
}
reactions += { case ValueChanged(`search`) => delay_search.invoke() }
}, "Search Symbols")
pages map (p => p.title = (space_explode('_', p.title) map Library.capitalize).mkString(" ") )
}
set_content(group_tabs)
}