Mercurial Hosting > luan
changeset 1903:b3850e44e037
ed link
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Tue, 15 Apr 2025 14:08:18 -0600 |
parents | 9f07d69551d6 |
children | ad1dc9f103b7 |
files | src/luan/modules/editor/find.luan src/luan/modules/swing/Swing.luan |
diffstat | 2 files changed, 13 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
diff -r 9f07d69551d6 -r b3850e44e037 src/luan/modules/editor/find.luan --- a/src/luan/modules/editor/find.luan Tue Apr 15 13:31:51 2025 -0600 +++ b/src/luan/modules/editor/find.luan Tue Apr 15 14:08:18 2025 -0600 @@ -14,6 +14,8 @@ local Layout = require "luan:swing/Layout.luan" local new_mig_layout = Layout.new_mig_layout or error() local new_button = require("luan:swing/Button.luan").new or error() +local Swing = require "luan:swing/Swing.luan" +local browse = Swing.browse or error() local function get_matches(text,s) @@ -194,6 +196,9 @@ regex_check_box new_button{ text = "Learn About Regular Expressions" + action_listener = function(_) + browse("https://www.reactionary.software/learn.html#regex") + end } } }
diff -r 9f07d69551d6 -r b3850e44e037 src/luan/modules/swing/Swing.luan --- a/src/luan/modules/swing/Swing.luan Tue Apr 15 13:31:51 2025 -0600 +++ b/src/luan/modules/swing/Swing.luan Tue Apr 15 14:08:18 2025 -0600 @@ -3,7 +3,9 @@ local ipairs = Luan.ipairs or error() require "java" local System = require "java:java.lang.System" +local URI = require "java:java.net.URI" local Insets = require "java:java.awt.Insets" +local Desktop = require "java:java.awt.Desktop" local UIManager = require "java:javax.swing.UIManager" local FlatLightLaf = require "java:com.formdev.flatlaf.FlatLightLaf" local SwingLuan = require "java:luan.modules.swing.SwingLuan" @@ -34,4 +36,10 @@ Swing.new_insets = Insets.new -- top, left, bottom, right Swing.no_insets = Insets.new(0,0,0,0) +local desktop = Desktop.getDesktop() + +function Swing.browse(url) + desktop.browse( URI.new(url) ) +end + return Swing