[squeak-dev] The Inbox: Morphic-ct.1994.mcz
Thiede, Christoph
Christoph.Thiede at student.hpi.uni-potsdam.de
Thu May 19 11:25:45 UTC 2022
Before:
[cid:1060132a-f3c4-439a-8216-399a4d3606d8]
After:
[cid:3cae3f01-51ff-4bed-9387-6fa24eb5fb9b]
This proposal improves consistency with the codeProvenance button in code holders.
Best,
Christoph
________________________________
Von: Squeak-dev <squeak-dev-bounces at lists.squeakfoundation.org> im Auftrag von commits at source.squeak.org <commits at source.squeak.org>
Gesendet: Donnerstag, 19. Mai 2022 13:23:57
An: squeak-dev at lists.squeakfoundation.org
Betreff: [squeak-dev] The Inbox: Morphic-ct.1994.mcz
A new version of Morphic was added to project The Inbox:
http://source.squeak.org/inbox/Morphic-ct.1994.mcz
==================== Summary ====================
Name: Morphic-ct.1994
Author: ct
Time: 19 May 2022, 1:23:51.16178 pm
UUID: 114c8aca-e31d-444d-8cc2-d19bebd28cdc
Ancestors: Morphic-ct.1993
Minor UI improvement to FontImporter: Use menu style for the previewText button and make the buttons in the preview slightly larger to avoid overlapping texts.
=============== Diff against Morphic-ct.1993 ===============
Item was changed:
----- Method: FontImporterTool>>buildPreviewPaneWith: (in category 'ui - building') -----
buildPreviewPaneWith: builder
"Build the preview panel. Offer the user the change preview text through the default font, point size, extra (glyph) scale and extra (line) gap."
^ builder pluggablePanelSpec new
" wantsResizeHandles: true;"
children: {
builder pluggablePanelSpec new
children: {
builder pluggableButtonSpec new
model: self;
help: #previewTextButtonHelp;
label: #previewTextButtonLabel;
action: #offerPreviewTextMenu;
+ style: #menuButton;
+ frame: (LayoutFrame fractions: (0 at 0 corner: 0.2 at 1));
- frame: (LayoutFrame fractions: (0 at 0 corner: 0.15 at 1));
yourself.
builder pluggableInputFieldSpec new
model: self;
help: 'Type custom preview text here...' translated;
getText: #customPreviewText;
setText: #acceptCustomPreviewText:;
editText: #editCustomPreviewText:;
plainTextOnly: true;
+ frame: (LayoutFrame fractions: (0.2 at 0 corner: 0.8 at 1));
- frame: (LayoutFrame fractions: (0.15 at 0 corner: 0.85 at 1));
yourself.
builder pluggableButtonSpec new
model: self;
help: 'Click to see current preview text using the system''s current fonts for comparison' translated;
label: 'Compare' translated;
action: #browseSystemFonts;
+ frame: (LayoutFrame fractions: (0.8 at 0 corner: 1 at 1));
- frame: (LayoutFrame fractions: (0.85 at 0 corner: 1 at 1));
yourself };
frame: (LayoutFrame
fractions: (0 at 0 corner: 1 at 0)
offsets: (0 at 0 corner: 0@ self customPreviewTextHeight));
yourself.
builder pluggableTextSpec new
model: self;
getText: #previewText;
textStyle: #selectedFontTextStyle;
askBeforeDiscardingEdits: false;
indicateUnacceptedChanges: false;
softLineWrap: false;
padding: self previewTextPadding;
stylerClass: (TextStyler for: #Smalltalk);
menu: #previewTextMenu:shifted:;
frame: (LayoutFrame
fractions: (0 at 0 corner: 1 at 1)
offsets: (0 @ self customPreviewTextHeight corner: 0@ self configurationPanelHeight negated));
yourself.
builder pluggablePanelSpec new name: #configPanel; children: (Array streamContents: [:s | | n |
n := 0.
self fontConfigurationSpecs groupsDo: [:kind :get :help :label :group | | w |
kind caseOf: {
[#spacer] -> [
w := builder pluggableSpacerSpec new fillSpaceHorizontally].
[#button] -> [
w := builder pluggableButtonSpec new
model: self; label: label; action: get; help: help; yourself].
[#text] -> [
w := builder pluggableInputFieldSpec new
model: self; getText: get; setText: get asSimpleSetter;
help: help; plainTextOnly: true; yourself].
} otherwise: [ "Ignore" ].
w ifNotNil: [ "Remember the group. See #toggleEditMode"
w name: (group, (n := n + 1)) asSymbol.
s nextPut: w] ]]);
layout: #horizontal;
frame: self configurationPanelFrame;
yourself.
};
yourself!
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220519/74d83c25/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pastedImage.png
Type: image/png
Size: 32501 bytes
Desc: pastedImage.png
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220519/74d83c25/attachment-0002.png>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pastedImage.png
Type: image/png
Size: 32785 bytes
Desc: pastedImage.png
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220519/74d83c25/attachment-0003.png>
More information about the Squeak-dev
mailing list
|