[STUMP] yeahconsole suckery

[Bob Farrell]

Ho my men,

I'm having trouble with yeahconsole. Sometimes yeahconsole manages to grab the
keyboard and not give it back when I take it off the screen. I think this might
be when I move the mouse out of yeahconsole and then Stump gets the keyboard
again or something...

Anyway, the only way to give StumpWM the keyboard back is by exiting
yeahconsole. Then, when I try to go to the scratch group, I get this:

XLIB:SET-INPUT-FOCUS: :POINTER-ROOT is not of type XLIB:WINDOW
<1> #<SYSTEM-FUNCTION EXT:SHOW-STACK> 3
<2> #<COMPILED-FUNCTION STUMPWM::PRINT-BACKTRACE>
frame binding variables (~ = dynamically):
  | ~ *STANDARD-OUTPUT* <--> #<IO SYNONYM-STREAM *TERMINAL-IO*>
- #<COMPILED-FUNCTION STUMPWM::BACKTRACE-STRING>
<3> #<COMPILED-FUNCTION STUMPWM::BACKTRACE-STRING>
- #<SIMPLE-TYPE-ERROR #x207E3836>
- :TOP-LEVEL
- :ABORT
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-2-1>
- #<SIMPLE-TYPE-ERROR #x207E3836>
<4> #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-2-1>
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-2-1>
- #<SIMPLE-TYPE-ERROR #x207E3836>
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP>
<5> #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP>
unwind-protect frame
- #<SIMPLE-TYPE-ERROR #x207E3836>
catch frame for tag SYSTEM::DONE-SIGNALING
<6> #<SYSTEM-FUNCTION SIGNAL> 1
frame binding variables (~ = dynamically):
  | ~ *PRINT-READABLY* <--> NIL
frame binding variables (~ = dynamically):
  | ~ *PRINT-ESCAPE* <--> T
- #<SIMPLE-TYPE-ERROR #x207E3836>
- :POINTER-ROOT
- XLIB:WINDOW
- #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 #x20732656>
<7> #<ADD-ON-SYSTEM-FUNCTION XLIB:SET-INPUT-FOCUS> 3
- (#S(STUMPWM::KEY :KEYSYM 106 :SHIFT NIL :CONTROL NIL :META T :ALT NIL :HYPER 
NIL :SUPER NIL))
- "fnext"
- :POINTER-ROOT
- :POINTER-ROOT
- #<COMPILED-FUNCTION STUMPWM::GET-CMD>
- 24
- 54
<8> #<COMPILED-FUNCTION STUMPWM::GET-CMD>
- #<COMPILED-FUNCTION #:G26307>
- 24
- 54
- 
(:DISPLAY #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 
#x20732656> :EVENT-CODE 2 :SEND-EVENT-P NIL :SEQUENCE 55647 :EVENT-KEY 
:KEY-PRESS :CODE 54 :WINDOW
 #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :EVENT-WINDOW 
#<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :CHILD 
#<XLIB:WINDOW 834x1040+2+2 localhost #x0160000F #x207566E6> :ROOT
 #<XLIB:WINDOW 2960x1050+0+0 localhost #x00000236 #x20732A6E> :X 154 :Y 420 
:ROOT-X 1435 :ROOT-Y 423 :STATE 24 :TIME 352528057 :SAME-SCREEN-P T)
<9> #<COMPILED-FUNCTION #:G26307>
- #<COMPILED-FUNCTION #:G26307>
frame binding variables (~ = dynamically):
  | ~ SYSTEM::*ACTIVE-RESTARTS* <--> 
(#S(RESTART :NAME STUMPWM::QUIT-STUMPWM :TEST #<COMPILED-FUNCTION 
SYSTEM::DEFAULT-RESTART-TEST> :INVOKE-TAG #:SIMPLE-RESTART-31373 
:INVOKE-FUNCTION NIL
    :REPORT #<FUNCTION :LAMBDA (STREAM) (FORMAT STREAM "Quit Stumpwm")> 
:INTERACTIVE #<COMPILED-FUNCTION SYSTEM::DEFAULT-RESTART-INTERACTIVE> 
:MEANINGFULP T))
catch frame for tag #:SIMPLE-RESTART-27063
- #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT-2>
<10> #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT-2>
- #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT-2>
handler frame for conditions (OR XLIB:WINDOW-ERROR XLIB:DRAWABLE-ERROR)
- #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT-2>
- #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT-1>
compiled tagbody frame for #(NIL)
- 143
- 
#(#(#(NIL
      (:DISPLAY #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) 
X11.0 #x20732656> :EVENT-CODE 2 :SEND-EVENT-P NIL :SEQUENCE 55647 :EVENT-KEY 
:KEY-PRESS :CODE 54 :WINDOW
       #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> 
:EVENT-WINDOW #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> 
:CHILD #<XLIB:WINDOW 834x1040+2+2 localhost #x0160000F #x207566E6>
       :ROOT #<XLIB:WINDOW 2960x1050+0+0 localhost #x00000236 #x20732A6E> :X 
154 :Y 420 :ROOT-X 1435 :ROOT-Y 423 :STATE 24 :TIME 352528057 :SAME-SCREEN-P T))
    #<COMPILED-FUNCTION #:G26307>)
  NIL)
- #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486>
- 
#(#(NIL
    (:DISPLAY #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 
#x20732656> :EVENT-CODE 2 :SEND-EVENT-P NIL :SEQUENCE 55647 :EVENT-KEY 
:KEY-PRESS :CODE 54 :WINDOW
     #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :EVENT-WINDOW 
#<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :CHILD 
#<XLIB:WINDOW 834x1040+2+2 localhost #x0160000F #x207566E6> :ROOT
     #<XLIB:WINDOW 2960x1050+0+0 localhost #x00000236 #x20732A6E> :X 154 :Y 420 
:ROOT-X 1435 :ROOT-Y 423 :STATE 24 :TIME 352528057 :SAME-SCREEN-P T))
  #<COMPILED-FUNCTION #:G26307>)
- 
#(NIL
  (:DISPLAY #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 
#x20732656> :EVENT-CODE 2 :SEND-EVENT-P NIL :SEQUENCE 55647 :EVENT-KEY 
:KEY-PRESS :CODE 54 :WINDOW
   #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :EVENT-WINDOW 
#<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :CHILD 
#<XLIB:WINDOW 834x1040+2+2 localhost #x0160000F #x207566E6> :ROOT
   #<XLIB:WINDOW 2960x1050+0+0 localhost #x00000236 #x20732A6E> :X 154 :Y 420 
:ROOT-X 1435 :ROOT-Y 423 :STATE 24 :TIME 352528057 :SAME-SCREEN-P T))
- #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT>
- :KEY-PRESS
- #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 #x20732656>
- 
(:DISPLAY #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 
#x20732656> :EVENT-CODE 2 :SEND-EVENT-P NIL :SEQUENCE 55647 :EVENT-KEY 
:KEY-PRESS :CODE 54 :WINDOW
 #<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :EVENT-WINDOW 
#<XLIB:WINDOW 838x1044+0+2 localhost #x01600005 #x20755486> :CHILD 
#<XLIB:WINDOW 834x1040+2+2 localhost #x0160000F #x207566E6> :ROOT
 #<XLIB:WINDOW 2960x1050+0+0 localhost #x00000236 #x20732A6E> :X 154 :Y 420 
:ROOT-X 1435 :ROOT-Y 423 :STATE 24 :TIME 352528057 :SAME-SCREEN-P T)
<11> #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT>
- #<UNBOUND>
- #<UNBOUND>
- #<UNBOUND>
- #<UNBOUND>
- #<COMPILED-FUNCTION STUMPWM::HANDLE-EVENT>
- #<XLIB:DISPLAY localhost:0 (The X.Org Foundation R10400090) X11.0 #x20732656>
<12> #<ADD-ON-SYSTEM-FUNCTION XLIB:PROCESS-EVENT> 2
- NIL
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-3>
<13> #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-3>
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-3>
handler frame for conditions XLIB:LOOKUP-ERROR ERROR
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-3>
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-2>
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP-1>
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP>
<14> #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL-LOOP>
frame binding variables (~ = dynamically):
  | ~ *PACKAGE* <--> #<PACKAGE COMMON-LISP-USER>
unwind-protect frame
frame binding variables (~ = dynamically):
  | ~ SYSTEM::*ACTIVE-RESTARTS* <--> NIL
catch frame for tag #:SIMPLE-RESTART-31373
- :LOCAL
- 0
- 0
- ""
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL>
- ":0.0"
<15> #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL>
catch frame for tag :TOP-LEVEL
- #<COMPILED-FUNCTION STUMPWM>
- ":0.0"
<16> #<COMPILED-FUNCTION STUMPWM>
- #<COMPILED-FUNCTION STUMPWM>
EVAL frame for form (STUMPWM)
- ((EXT:QUIT))
frame binding environments
  VAR_ENV <--> NIL
  FUN_ENV <--> NIL
  BLOCK_ENV <--> NIL
  GO_ENV <--> NIL
  DECL_ENV <--> ((DECLARATION XLIB::CLX-VALUES VALUES OPTIMIZE DECLARATION))
frame binding variables #<ADDRESS #xB78D9028> binds (~ = dynamically):
  Next environment: NIL
APPLY frame for call (:LAMBDA)
<17> #<FUNCTION :LAMBDA NIL (STUMPWM) (EXT:QUIT)> 0
- #<FUNCTION :LAMBDA NIL (STUMPWM) (EXT:QUIT)>
- #<COMPILED-FUNCTION EXT::SAVEINITMEM-1>



:-(

-- 
--------------------------
Bob Farrell
pH, an Experian Company
www.phgroup.com
Office Line: 020 7598 0310
Fax: 020 7598 0311
--------------------------