Thanks.  These are great and work like a charm.

-----Original Message-----
From: Rainer Stengele [mailto:rainer.steng...@online.de] 
Sent: Tuesday, February 02, 2010 12:37 PM
To: Brody, William (Buck)
Cc: emacs-orgmode@gnu.org
Subject: Re: switching to emacs via keboard shortcut

Am 02.02.2010 16:52, schrieb Brody, William (Buck):
> I run org-mode on GMU Emacs for Windows.  During my workflow I am
> frequently alt-tab 'ing to get back to Emacs. Does anyone have a way to
> use a keyboard shortcut (maybe via an autohotkey script) to get back to
> emacs.
>
> Thanks
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

In an AutoHotkey script I have

; 
-------------------------------------------------------------------------------
; raise Emacs with "Ctrl-Meta-Shift-e"
^!+e::
if WinExist("ahk_class Emacs")
{
   IfWinActive
   {
     WinMinimize
   }
   else
   {
     WinActivate
   }
}
else
{
         Run %SystemDrive%\Programme\Emacs\emacs\bin\emacsclient.exe
}
return
; 
-------------------------------------------------------------------------------
; raise Emacs with "Windows + Shift + e"
#+e::
if WinExist("ahk_class Emacs")
{
   IfWinActive
   {
     WinMinimize
   }
   else
   {
     WinActivate
   }
}
else
{
         Run %SystemDrive%\Programme\Emacs\emacs\bin\emacsclient.exe
}
return
-----------------------------------------------------------------------------
I also have


; 
-------------------------------------------------------------------------------
#t:: ; raise Thunderbird with "Windows + Shift + t"
IfWinExist, Thunderbird
{
   IfWinActive
   {
     WinMinimize
   }
   else
   {
     WinActivate
   }
}
return
; 
-------------------------------------------------------------------------------
#f:: ; Firefox vorholen
IfWinExist, Mozilla Firefox
{
   IfWinActive
   {
     WinMinimize
   }
   else
   {
     WinActivate
   }
}
return
; 
-------------------------------------------------------------------------------
#p:: raise a specific Putty
; if WinExist("fritz.diplan.de - PuTTY")
if WinExist("debian2.diplan.de - PuTTY")
{
   WinActivate
}
return
; 
-------------------------------------------------------------------------------
; jump to clocked-in org todo
^!+F12::
; IfWinExist, Emacs
if WinExist("ahk_class Emacs")
{       WinActivate
         ; Send ^s
         Send ^!{F12}
}
else
{
         Run Notepad
}
return
; 
-------------------------------------------------------------------------------
; Org Remember
^!+r::
; IfWinExist, Emacs
if WinExist("ahk_class Emacs")
{       WinActivate
         ; Send ^s
         Send ^!r
}
else
{
         Run Notepad
}
return
; 
-------------------------------------------------------------------------------

All this and a lot more scripts and helpers makes Windows really usable ...


Rainer



_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to