view src/laf.html.luan @ 85:0d1a0fa301ea

minor
author Franklin Schmidt <fschmidt@gmail.com>
date Fri, 18 Apr 2025 10:51:59 -0600
parents d990b7aa68b4
children
line wrap: on
line source

local Luan = require "luan:Luan.luan"
local error = Luan.error
local Io = require "luan:Io.luan"
local Http = require "luan:http/Http.luan"
local Shared = require "site:/lib/Shared.luan"
local head = Shared.head or error()
local needed_header = Shared.needed_header or error()


return function()
	Io.stdout = Http.response.text_writer()
%>
<!doctype html>
<html>
	<head>
<%		head() %>
		<title>Reactionary Software - Swing Look and Feel</title>
		<style>
			li {
				margin-top: 8px;
			}
		</style>
	</head>
	<body>
<%		needed_header() %>
		<div content>
			<h1>Swing Look and Feel</h1>

			<p>All existing <a href="https://docs.oracle.com/javase/tutorial/uiswing/lookandfeel/">Swing look and feels</a> are horrible.  A good look and feel would:</p>

			<ul>
				<li>Have no white space around components.  The layout manager should handle this.</li>
				<li>Support <code>apple.laf.useScreenMenuBar</code>.</li>
				<li>When a text component loses focus, the selection should not disappear and the cursor should just stop blinking.</li>
				<li>Have a good reactionary (non-flat) aesthetic.</li>
			</ul>

			<p>You can read about my struggles with look and feels in this <a href="https://chatgpt.com/share/67fd89eb-872c-8013-ae98-653c99b9bc3c">ChatGPT thread</a>.  A reactionary look and feel is badly needed.</p>
		</div>
	</body>
</html>
<%
end