On 10.02.2017, at 19:19, Chris Muller asqueaker@gmail.com wrote:
+1. I actually use strikeout in my workspace notes, I do not want to do without it.
I think we should move these keys to the Font dialog, and make the font dialog accessible from the DockingBar menu. The need to change font sizes in a Squeak image is a lot less frequent than in, say, a web browser, because navigating in a web browser takes one to different authored pages that need to be resized all the time, which isn't the case with Squeak..
Hmm, or find something more sensible for _font_ changes than 01234567890-= …
Best, Chris
PS -- There's one additional problem -- when expanding the font it says, "Sorry, can't do that" or something like that. Its because the new DarkMap font does not have any larger size.. Can't we scale the fonts?
Nope, they're currently bitmap, both default and darkmap. If you change to a ttf like Bitstream DejaVu (not bitmap) it should work.
Best regards -Tobias
On Fri, Feb 10, 2017 at 9:11 AM, Tobias Pape Das.Linux@gmx.de wrote:
Sorry for digging this up…
On 18.01.2017, at 10:04, commits@source.squeak.org wrote:
Tim Felgentreff uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-tfel.1317.mcz
==================== Summary ====================
Name: Morphic-tfel.1317 Author: tfel Time: 18 January 2017, 10:03:40.884167 am UUID: 8a50cc7e-f401-4381-a1ce-97d0423370b1 Ancestors: Morphic-bp.1316
add Ctrl +, Ctrl -, and Ctrl = (as in Emacs) for quick font size changes
=============== Diff against Morphic-bp.1316 ===============
Item was changed: ----- Method: PasteUpMorph>>filterEvent:for: (in category 'events-processing') ----- filterEvent: aKeyboardEvent for: anObject "Provide keyboard shortcuts."
"Delegate keyboard shortcuts to my docking bars." self submorphsDo: [:ea | ea isDockingBar ifTrue: [ ea filterEvent: aKeyboardEvent for: anObject. "No support for converting events here!!" aKeyboardEvent wasIgnored ifTrue: [^ aKeyboardEvent "early out"]]].
aKeyboardEvent isKeystroke ifFalse: [^ aKeyboardEvent].
aKeyboardEvent commandKeyPressed ifTrue: [ aKeyboardEvent keyCharacter caseOf: { [$R] -> [Utilities browseRecentSubmissions]. [$L] -> [self findAFileList: aKeyboardEvent]. [$O] -> [self findAMonticelloBrowser]. [$P] -> [self findAPreferencesPanel: aKeyboardEvent]. "[$Z] -> [ChangeList browseRecentLog]." [$]] -> [Smalltalk snapshot: true andQuit: false]. } otherwise: [^ aKeyboardEvent "no hit"]. ^ aKeyboardEvent ignore "hit!!"].
aKeyboardEvent controlKeyPressed ifTrue: [
aKeyboardEvent keyCharacter caseOf: {
[$+] -> [Preferences increaseFontSize].
[$-] -> [Preferences decreaseFontSize].
[$=] -> [Preferences restoreDefaultFonts].
I'd really love to use this but here are two problems:
- I cannot hit cmd-+ on an us-layout, because it is cmd-shift-=,
and interpreted as cmd-=, restoring the default font. 2. These shortcuts seem to be global and shadow the 'changeEmphasis' of Text/SmaltalkEditor:
'0123456789-=' do: [:char | cmdMap at: char asciiValue + 1 put: #changeEmphasis:].
#changeEmphasis: maps - to underlined and = to struckOut. Since the PasteUpMorph shortcuts seem to dominate the one in TextEditor, it is now impossible to mark text as undlerlined or struck out…
What can we do?
Best regards -Tobias
} otherwise: [^ aKeyboardEvent "no hit"].
^ aKeyboardEvent ignore "hit!!"].
- ^ aKeyboardEvent "no hit"!