Hi

See my earlier email was bounced.
...

Ok, hacked and debugged my pharo 4 image and I've got ctrl- left or right 
working on my mac.

Two changes needed 

TaskListMorph>>keyStroke: event  needs to change as per below to add the ctrl 
left or right.

TaskListMorph>>keyStroke: event 
        "Process keys to switch task."
        event keyCharacter = Character escape ifTrue: [^self delete].
        event anyModifierKeyPressed ifFalse: [^self done].

        event keyString =  '<Ctrl-left>' ifTrue: [^self selectPreviousTask].
        event keyString =  '<Ctrl-right>'       ifTrue: [^self selectNextTask].
                
        event keyString =  '<Opt-Shift-tab>' ifTrue: [^self selectPreviousTask].
        event keyString =  '<Opt-tab>'  ifTrue: [^self selectNextTask]

Then TaskListMorph>>isNavigationEvent: aKeyboardEvent needs to change as per 
below:

isNavigationEvent: aKeyboardEvent
        | validCombos |
        validCombos := Array with: Character tab alt with: Character tab alt 
shift with: Character arrowLeft ctrl with: Character arrowRight ctrl .
        ^ validCombos contains: [:each | each = aKeyboardEvent 
asKeyCombination].

Ctrl-left or Ctrl-right works, and again you need to press any key to select 
the window on preview.

Cheers
Carlo



On 16 May 2015, at 1:32 AM, Avdi Grimm <a...@avdi.org> wrote:

I'd be totally cool with Alt-Left/Right. I just want *something* so I don't 
have to lift my hand just to switch from e.g. Browser to Playground and back.

On Fri, May 15, 2015 at 7:23 PM Nicolai Hess <nicolaih...@web.de 
<mailto:nicolaih...@web.de>> wrote:
2015-05-16 1:11 GMT+02:00 Carlo <snoob...@gmail.com 
<mailto:snoob...@gmail.com>>:
On my 

Pharo4.0
Latest update: #40609

Pressing Alt-Tab brings up a debugger. Debugging the method shows:

But this does not work for Pharo on Windows . On windows alt+tab always 
switches between active applications.
There was some code on older versions of pharo, that uses alt+left arrow/right 
arrow instead of alt+tab for
the windows vm

 

newPreviewMorph
        "Answer a new preview holder."
        self halt.
        ^ Morph new
                color: Color transparent;
                extent: self defaultPreviewExtent;
                yourself.


On 16 May 2015, at 1:09 AM, Avdi G<Screenshot 2015:05:16, 1:11 AM.png>rimm 
<a...@avdi.org <mailto:a...@avdi.org>> wrote:



On Fri, May 15, 2015 at 7:06 PM Carlo <snoob...@gmail.com 
<mailto:snoob...@gmail.com>> wrote:
Removing the 'self halt' still works though.

Can you give me a little more detail about where to find this? Thanks! 


Reply via email to