rendered paste body22:51:9 find-window!
22:51:9 <<< :PROPERTY-NOTIFY
22:51:9 >>> :PROPERTY-NOTIFY
22:51:9 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_ICON_NAME :NEW-VALUE
22:51:9 find-window!
22:51:9 <<< :PROPERTY-NOTIFY
22:51:9 >>> :PROPERTY-NOTIFY
22:51:9 property notify #<XLIB:WINDOW :0 E00239> :WM_ICON_NAME :NEW-VALUE
22:51:9 find-window!
22:51:9 <<< :PROPERTY-NOTIFY
22:51:9 >>> :PROPERTY-NOTIFY
22:51:9 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_USER_TIME :NEW-VALUE
22:51:9 find-window!
22:51:9 <<< :PROPERTY-NOTIFY
22:51:9 >>> :KEY-PRESS
22:51:9 Awaiting key #<HASH-TABLE :TEST EQUALP :COUNT 3 {B8B97F9}>
22:51:9 key-press: #S(STUMPWM::KEY
:KEYSYM 116
:SHIFT NIL
:CONTROL T
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 4 STUMPWM:*ROOT-MAP*
22:51:9 Awaiting key *ROOT-MAP*
22:51:9 key-press: #S(STUMPWM::KEY
:KEYSYM 59
:SHIFT NIL
:CONTROL NIL
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 0 "colon"
22:51:9 arguments: (NIL)
22:51:13 arguments: NIL
; compiling file "/home/plutonas/stumpwm/core.lisp" (written 27 JAN 2007 10:51:07 PM):
; compiling (IN-PACKAGE :STUMPWM)
; compiling (WHEN (NULL *TOP-MAP*) ...)
; compiling (DEFUN TRANSLATE-ID ...)
; compiling (DEFUN SCREEN-X ...)
; compiling (DEFUN SCREEN-Y ...)
; compiling (DEFUN SCREEN-HEIGHT ...)
; compiling (DEFUN SCREEN-WIDTH ...)
; compiling (DEFUN FIND-SCREEN ...)
; compiling (DEFUN MOVE-GROUP-TO-HEAD ...)
; compiling (DEFUN SORT-GROUPS ...)
; compiling (DEFUN FMT-GROUP-STATUS ...)
; compiling (DEFUN FIND-FREE-GROUP-NUMBER ...)
; compiling (DEFUN GROUP-CURRENT-WINDOW ...)
; compiling (DEFUN SWITCH-TO-GROUP ...)
; compiling (DEFUN MOVE-WINDOW-TO-GROUP ...)
; compiling (DEFUN NEXT-GROUP ...)
; compiling (DEFUN MERGE-GROUPS ...)
; compiling (DEFUN KILL-GROUP ...)
; compiling (DEFUN ADD-GROUP ...)
; compiling (DEFUN WINDOW-IN-CURRENT-GROUP-P ...)
; compiling (DEFUN WINDOW-SCREEN ...)
; compiling (DEFUN UPDATE-WINDOW-BORDER ...)
; compiling (DEFUN SEND-CLIENT-MESSAGE ...)
; compiling (DEFUN FMT-WINDOW-STATUS ...)
; compiling (DEFUN FMT-WINDOW-MARKED ...)
; compiling (DEFUN XWIN-NAME ...)
; compiling (DEFUN RAISE-WINDOW ...)
; compiling (DEFUN TRUE-HEIGHT ...)
; compiling (DEFUN TRUE-WIDTH ...)
; compiling (DEFUN XWIN-BORDER-WIDTH ...)
; compiling (DEFUN (SETF XWIN-BORDER-WIDTH) ...)
; compiling (DEFUN DEFAULT-BORDER-WIDTH-FOR-TYPE ...)
; compiling (DEFUN XWIN-CLASS ...)
; compiling (DEFUN XWIN-RES-NAME ...)
; compiling (DEFMACRO DEF-WINDOW-ATTR ...)
; compiling (DEFUN SORT-WINDOWS ...)
; compiling (DEFUN MARKED-WINDOWS ...)
; compiling (DEFUN CLEAR-WINDOW-MARKS ...)
; compiling (DEFUN (SETF XWIN-STATE) ...)
; compiling (DEFUN XWIN-STATE ...)
; compiling (DEFUN WINDOW-HIDDEN-P ...)
; compiling (DEFUN XWIN-UNHIDE ...)
; compiling (DEFUN UNHIDE-WINDOW ...)
; compiling (DEFUN XWIN-HIDE ...)
; compiling (DEFUN HIDE-WINDOW ...)
; compiling (DEFUN XWIN-TYPE ...)
; compiling (DEFUN XWIN-SEND-CONFIGURATION-NOTIFY ...)
; compiling (DEFUN GEOMETRY-HINTS ...)
; compiling (DEFUN SET-WINDOW-GEOMETRY ...)
; compiling (DEFUN MAXIMIZE-WINDOW ...)
; compiling (DEFUN FIND-FREE-WINDOW-NUMBER ...)
; compiling (DEFUN REPARENT-WINDOW ...)
; compiling (DEFUN PROCESS-EXISTING-WINDOWS ...)
; compiling (DEFUN XWIN-GRAB-KEYS ...)
; compiling (DEFUN GRAB-KEYS-ON-WINDOW ...)
; compiling (DEFUN XWIN-UNGRAB-KEYS ...)
; compiling (DEFUN UNGRAB-KEYS-ON-WINDOW ...)
; compiling (DEFUN SYNC-KEYS ...)
; compiling (DEFGENERIC GROUP-ADD-WINDOW ...)
; compiling (DEFMETHOD GROUP-ADD-WINDOW ...)
; compiling (DEFUN ADD-WINDOW ...)
; compiling (DEFUN PROCESS-MAPPED-WINDOW ...)
; compiling (DEFUN REMOVE-WINDOW ...)
; compiling (DEFUN MOVE-WINDOW-TO-HEAD ...)
; compiling (DEFUN NO-FOCUS ...)
; compiling (DEFUN MAYBE-HIDE-WINDOW ...)
; compiling (DEFUN FOCUS-WINDOW ...)
; compiling (DEFUN DELETE-WINDOW ...)
; compiling (DEFUN XWIN-KILL ...)
; compiling (DEFUN COLOR-EXISTS-P ...)
; compiling (DEFUN FONT-EXISTS-P ...)
; compiling (DEFUN SET-FG-COLOR ...)
; compiling (DEFUN SET-BG-COLOR ...)
; compiling (DEFUN SET-BORDER-COLOR ...)
; compiling (DEFUN SET-FONT ...)
; compiling (DEFUN GET-COLOR-PIXEL ...)
; compiling (DEFUN GET-FG-COLOR-PIXEL ...)
; compiling (DEFUN GET-BG-COLOR-PIXEL ...)
; compiling (DEFUN GET-BORDER-COLOR-PIXEL ...)
; compiling (DEFUN MAX-WIDTH ...)
; compiling (DEFUN SETUP-WIN-GRAVITY ...)
; compiling (DEFUN SETUP-MESSAGE-WINDOW ...)
; compiling (DEFUN INVERT-RECT ...)
; compiling (DEFUN FRAME-RAISE-WINDOW ...)
; compiling (DEFUN FOCUS-FRAME ...)
; compiling (DEFUN FRAME-WINDOWS ...)
; compiling (DEFUN FRAME-SORT-WINDOWS ...)
; compiling (DEFUN MAKE-INITIAL-FRAME ...)
; compiling (DEFUN COPY-FRAME-TREE ...)
; compiling (DEFUN GROUP-FRAMES ...)
; compiling (DEFUN FIND-FREE-FRAME-NUMBER ...)
; compiling (DEFUN SPLIT-FRAME-H ...)
; compiling (DEFUN SPLIT-FRAME-V ...)
; compiling (DEFUN FUNCALL-ON-LEAF ...)
; compiling (DEFUN FUNCALL-ON-NODE ...)
; compiling (DEFUN REPLACE-FRAME-IN-TREE ...)
; compiling (DEFUN SIBLING ...)
; compiling (DEFUN MIGRATE-FRAME-WINDOWS ...)
; compiling (DEFUN TREE-ACCUM-FN ...)
; compiling (DEFUN TREE-ITERATE ...)
; compiling (DEFUN TREE-X ...)
; compiling (DEFUN TREE-Y ...)
; compiling (DEFUN TREE-WIDTH ...)
; compiling (DEFUN TREE-HEIGHT ...)
; compiling (DEFUN TREE-ROW-SPLIT ...)
; compiling (DEFUN TREE-COLUMN-SPLIT ...)
; compiling (DEFUN EXPAND-FRAME ...)
; compiling (DEFUN EXPAND-TREE ...)
; compiling (DEFUN JOIN-SUBTREES ...)
; compiling (DEFUN REMOVE-FRAME ...)
; compiling (DEFUN SYNC-FRAME-WINDOWS ...)
; compiling (DEFUN SYNC-ALL-FRAME-WINDOWS ...)
; compiling (DEFUN DEPTH-FIRST-SEARCH ...)
; compiling (DEFUN SPREE-ROOT-BRANCH ...)
; compiling (DEFUN OFFSET-FRAMES ...)
; compiling (DEFUN RESIZE-FRAME ...)
; compiling (DEFUN SPLIT-FRAME ...)
; compiling (DEFUN DRAW-FRAME-OUTLINES ...)
; compiling (DEFUN CLEAR-FRAME-OUTLINES ...)
; compiling (DEFUN DRAW-FRAME-NUMBERS ...)
; compiling (DEFUN SORT-SCREENS ...)
; compiling (DEFUN NEXT-SCREEN ...)
; compiling (DEFUN MOVE-SCREEN-TO-HEAD ...)
; compiling (DEFUN SWITCH-TO-SCREEN ...)
; compiling (DEFUN SCREEN-SET-FOCUS ...)
; compiling (DEFUN SCREEN-CURRENT-WINDOW ...)
; compiling (DEFUN FIND-WINDOW ...)
; compiling (DEFUN SCREEN-ROOT ...)
; compiling (DEFUN UPDATE-COLORS-FOR-SCREEN ...)
; compiling (DEFUN UPDATE-COLORS-ALL-SCREENS ...)
; compiling (DEFUN INTERNAL-WINDOW-P ...)
; compiling (DEFUN UNMAP-MESSAGE-WINDOW ...)
; compiling (DEFUN UNMAP-ALL-MESSAGE-WINDOWS ...)
; compiling (DEFUN UNMAP-FRAME-INDICATOR ...)
; compiling (DEFUN UNMAP-ALL-FRAME-INDICATORS ...)
; compiling (DEFUN SHOW-FRAME-INDICATOR ...)
; compiling (DEFUN ECHO-IN-WINDOW ...)
; compiling (DEFUN PUSH-LAST-MESSAGE ...)
; compiling (DEFUN ECHO-NTH-LAST-MESSAGE ...)
; compiling (DEFUN ECHO-STRING-LIST ...)
; compiling (DEFUN ECHO-STRING ...)
; compiling (DEFUN CURRENT-SCREEN ...)
; compiling (DEFUN INIT-SCREEN ...)
; compiling (DEFUN KEY-TO-KEYCODE+STATE ...)
; compiling (DEFUN SEND-FAKE-KEY ...)
; compiling (DEFUN SEND-FAKE-CLICK ...)
; compiling (DEFUN GRAB-POINTER ...)
; compiling (DEFUN UNGRAB-POINTER ...)
; compiling (DEFUN GRAB-KEYBOARD ...)
; compiling (DEFUN UNGRAB-KEYBOARD ...)
; compiling (DEFUN WARP-POINTER ...)
; compiling (DEFUN WARP-POINTER-RELATIVE ...)
; compiling (DEFPARAMETER *EVENT-FN-TABLE* ...)
; compiling (DEFMACRO DEFINE-STUMP-EVENT-HANDLER ...)
; compiling (DEFUN HANDLE-UNMANAGED-WINDOW ...)
; compiling (DEFUN HANDLE-MANAGED-WINDOW ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :CONFIGURE-REQUEST ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :MAP-REQUEST ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :UNMAP-NOTIFY ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :DESTROY-NOTIFY ...)
; compiling (DEFUN READ-FROM-KEYMAP ...)
; compiling (DEFUN HANDLE-KEYMAP ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :KEY-PRESS ...)
; compiling (DEFUN BYTES-TO-WINDOW ...)
; compiling (DEFUN HANDLE-RP-COMMANDS ...)
; compiling (DEFUN UPDATE-WINDOW-PROPERTIES ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :PROPERTY-NOTIFY ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :MAPPING-NOTIFY ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :SELECTION-REQUEST ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :SELECTION-CLEAR ...)
; compiling (DEFINE-STUMP-EVENT-HANDLER :EXPOSURE ...)
; compiling (DEFUN HANDLE-EVENT ...)
; compiling (DEFUN EXPORT-SELECTION ...)
; compiling (DEFUN SET-X-SELECTION ...)
; compiling (DEFUN SEND-SELECTION ...)
; compiling (DEFUN GET-X-SELECTION ...)
; compiling (DEFVAR *TOP-MAP-LIST* ...)
; compiling (DEFUN PUSH-TOP-MAP ...)
; compiling (DEFUN POP-TOP-MAP ...)
; /var/cache/common-lisp-controller/1000/sbcl/local/home/plutonas/stumpwm/core.fasl written
; compilation finished in 0:00:02
STYLE-WARNING: redefining TRANSLATE-ID in DEFUN
STYLE-WARNING: redefining SCREEN-X in DEFUN
STYLE-WARNING: redefining SCREEN-Y in DEFUN
STYLE-WARNING: redefining SCREEN-HEIGHT in DEFUN
STYLE-WARNING: redefining SCREEN-WIDTH in DEFUN
STYLE-WARNING: redefining FIND-SCREEN in DEFUN
STYLE-WARNING: redefining MOVE-GROUP-TO-HEAD in DEFUN
STYLE-WARNING: redefining SORT-GROUPS in DEFUN
STYLE-WARNING: redefining FMT-GROUP-STATUS in DEFUN
STYLE-WARNING: redefining FIND-FREE-GROUP-NUMBER in DEFUN
STYLE-WARNING: redefining GROUP-CURRENT-WINDOW in DEFUN
Connection lost to X server `:0.0'
STYLE-WARNING: redefining SWITCH-TO-GROUP in DEFUN
STYLE-WARNING: redefining MOVE-WINDOW-TO-GROUP in DEFUN
STYLE-WARNING: redefining NEXT-GROUP in DEFUN
STYLE-WARNING: redefining MERGE-GROUPS in DEFUN
STYLE-WARNING: redefining KILL-GROUP in DEFUN
STYLE-WARNING: redefining ADD-GROUP in DEFUN
STYLE-WARNING: redefining WINDOW-IN-CURRENT-GROUP-P in DEFUN
STYLE-WARNING: redefining WINDOW-SCREEN in DEFUN
STYLE-WARNING: redefining UPDATE-WINDOW-BORDER in DEFUN
STYLE-WARNING: redefining SEND-CLIENT-MESSAGE in DEFUN
STYLE-WARNING: redefining FMT-WINDOW-STATUS in DEFUN
STYLE-WARNING: redefining FMT-WINDOW-MARKED in DEFUN
STYLE-WARNING: redefining XWIN-NAME in DEFUN
STYLE-WARNING: redefining RAISE-WINDOW in DEFUN
STYLE-WARNING: redefining TRUE-HEIGHT in DEFUN
STYLE-WARNING: redefining TRUE-WIDTH in DEFUN
STYLE-WARNING: redefining XWIN-BORDER-WIDTH in DEFUN
STYLE-WARNING: redefining (SETF XWIN-BORDER-WIDTH) in DEFUN
STYLE-WARNING: redefining DEFAULT-BORDER-WIDTH-FOR-TYPE in DEFUN
STYLE-WARNING: redefining XWIN-CLASS in DEFUN
STYLE-WARNING: redefining XWIN-RES-NAME in DEFUN
STYLE-WARNING: redefining SORT-WINDOWS in DEFUN
STYLE-WARNING: redefining MARKED-WINDOWS in DEFUN
STYLE-WARNING: redefining CLEAR-WINDOW-MARKS in DEFUN
STYLE-WARNING: redefining (SETF XWIN-STATE) in DEFUN
STYLE-WARNING: redefining XWIN-STATE in DEFUN
STYLE-WARNING: redefining WINDOW-HIDDEN-P in DEFUN
STYLE-WARNING: redefining XWIN-UNHIDE in DEFUN
STYLE-WARNING: redefining UNHIDE-WINDOW in DEFUN
STYLE-WARNING: redefining XWIN-HIDE in DEFUN
STYLE-WARNING: redefining HIDE-WINDOW in DEFUN
STYLE-WARNING: redefining XWIN-TYPE in DEFUN
STYLE-WARNING: redefining XWIN-SEND-CONFIGURATION-NOTIFY in DEFUN
STYLE-WARNING: redefining GEOMETRY-HINTS in DEFUN
STYLE-WARNING: redefining SET-WINDOW-GEOMETRY in DEFUN
STYLE-WARNING: redefining MAXIMIZE-WINDOW in DEFUN
STYLE-WARNING: redefining FIND-FREE-WINDOW-NUMBER in DEFUN
STYLE-WARNING: redefining REPARENT-WINDOW in DEFUN
STYLE-WARNING: redefining PROCESS-EXISTING-WINDOWS in DEFUN
STYLE-WARNING: redefining XWIN-GRAB-KEYS in DEFUN
STYLE-WARNING: redefining GRAB-KEYS-ON-WINDOW in DEFUN
STYLE-WARNING: redefining XWIN-UNGRAB-KEYS in DEFUN
STYLE-WARNING: redefining UNGRAB-KEYS-ON-WINDOW in DEFUN
STYLE-WARNING: redefining SYNC-KEYS in DEFUN
STYLE-WARNING: redefining GROUP-ADD-WINDOW in DEFGENERIC
STYLE-WARNING: redefining GROUP-ADD-WINDOW (TILE-GROUP T) in DEFMETHOD
STYLE-WARNING: redefining ADD-WINDOW in DEFUN
STYLE-WARNING: redefining PROCESS-MAPPED-WINDOW in DEFUN
STYLE-WARNING: redefining REMOVE-WINDOW in DEFUN
STYLE-WARNING: redefining MOVE-WINDOW-TO-HEAD in DEFUN
STYLE-WARNING: redefining NO-FOCUS in DEFUN
STYLE-WARNING: redefining MAYBE-HIDE-WINDOW in DEFUN
STYLE-WARNING: redefining FOCUS-WINDOW in DEFUN
STYLE-WARNING: redefining DELETE-WINDOW in DEFUN
STYLE-WARNING: redefining XWIN-KILL in DEFUN
STYLE-WARNING: redefining COLOR-EXISTS-P in DEFUN
STYLE-WARNING: redefining FONT-EXISTS-P in DEFUN
STYLE-WARNING: redefining SET-FG-COLOR in DEFUN
STYLE-WARNING: redefining SET-BG-COLOR in DEFUN
STYLE-WARNING: redefining SET-BORDER-COLOR in DEFUN
STYLE-WARNING: redefining SET-FONT in DEFUN
STYLE-WARNING: redefining GET-COLOR-PIXEL in DEFUN
STYLE-WARNING: redefining GET-FG-COLOR-PIXEL in DEFUN
STYLE-WARNING: redefining GET-BG-COLOR-PIXEL in DEFUN
STYLE-WARNING: redefining GET-BORDER-COLOR-PIXEL in DEFUN
STYLE-WARNING: redefining MAX-WIDTH in DEFUN
STYLE-WARNING: redefining SETUP-WIN-GRAVITY in DEFUN
STYLE-WARNING: redefining SETUP-MESSAGE-WINDOW in DEFUN
STYLE-WARNING: redefining INVERT-RECT in DEFUN
STYLE-WARNING: redefining FRAME-RAISE-WINDOW in DEFUN
STYLE-WARNING: redefining FOCUS-FRAME in DEFUN
STYLE-WARNING: redefining FRAME-WINDOWS in DEFUN
STYLE-WARNING: redefining FRAME-SORT-WINDOWS in DEFUN
STYLE-WARNING: redefining MAKE-INITIAL-FRAME in DEFUN
STYLE-WARNING: redefining COPY-FRAME-TREE in DEFUN
STYLE-WARNING: redefining GROUP-FRAMES in DEFUN
STYLE-WARNING: redefining FIND-FREE-FRAME-NUMBER in DEFUN
STYLE-WARNING: redefining SPLIT-FRAME-H in DEFUN
STYLE-WARNING: redefining SPLIT-FRAME-V in DEFUN
STYLE-WARNING: redefining FUNCALL-ON-LEAF in DEFUN
STYLE-WARNING: redefining FUNCALL-ON-NODE in DEFUN
STYLE-WARNING: redefining REPLACE-FRAME-IN-TREE in DEFUN
STYLE-WARNING: redefining SIBLING in DEFUN
STYLE-WARNING: redefining MIGRATE-FRAME-WINDOWS in DEFUN
STYLE-WARNING: redefining TREE-ACCUM-FN in DEFUN
STYLE-WARNING: redefining TREE-ITERATE in DEFUN
STYLE-WARNING: redefining TREE-X in DEFUN
STYLE-WARNING: redefining TREE-Y in DEFUN
STYLE-WARNING: redefining TREE-WIDTH in DEFUN
STYLE-WARNING: redefining TREE-HEIGHT in DEFUN
STYLE-WARNING: redefining TREE-ROW-SPLIT in DEFUN
STYLE-WARNING: redefining TREE-COLUMN-SPLIT in DEFUN
STYLE-WARNING: redefining EXPAND-FRAME in DEFUN
STYLE-WARNING: redefining EXPAND-TREE in DEFUN
STYLE-WARNING: redefining JOIN-SUBTREES in DEFUN
STYLE-WARNING: redefining REMOVE-FRAME in DEFUN
STYLE-WARNING: redefining SYNC-FRAME-WINDOWS in DEFUN
STYLE-WARNING: redefining SYNC-ALL-FRAME-WINDOWS in DEFUN
STYLE-WARNING: redefining DEPTH-FIRST-SEARCH in DEFUN
STYLE-WARNING: redefining SPREE-ROOT-BRANCH in DEFUN
STYLE-WARNING: redefining OFFSET-FRAMES in DEFUN
STYLE-WARNING: redefining RESIZE-FRAME in DEFUN
STYLE-WARNING: redefining SPLIT-FRAME in DEFUN
STYLE-WARNING: redefining DRAW-FRAME-OUTLINES in DEFUN
STYLE-WARNING: redefining CLEAR-FRAME-OUTLINES in DEFUN
STYLE-WARNING: redefining DRAW-FRAME-NUMBERS in DEFUN
STYLE-WARNING: redefining SORT-SCREENS in DEFUN
STYLE-WARNING: redefining NEXT-SCREEN in DEFUN
STYLE-WARNING: redefining MOVE-SCREEN-TO-HEAD in DEFUN
STYLE-WARNING: redefining SWITCH-TO-SCREEN in DEFUN
STYLE-WARNING: redefining SCREEN-SET-FOCUS in DEFUN
STYLE-WARNING: redefining SCREEN-CURRENT-WINDOW in DEFUN
STYLE-WARNING: redefining FIND-WINDOW in DEFUN
STYLE-WARNING: redefining SCREEN-ROOT in DEFUN
STYLE-WARNING: redefining UPDATE-COLORS-FOR-SCREEN in DEFUN
STYLE-WARNING: redefining UPDATE-COLORS-ALL-SCREENS in DEFUN
STYLE-WARNING: redefining INTERNAL-WINDOW-P in DEFUN
STYLE-WARNING: redefining UNMAP-MESSAGE-WINDOW in DEFUN
STYLE-WARNING: redefining UNMAP-ALL-MESSAGE-WINDOWS in DEFUN
STYLE-WARNING: redefining UNMAP-FRAME-INDICATOR in DEFUN
STYLE-WARNING: redefining UNMAP-ALL-FRAME-INDICATORS in DEFUN
STYLE-WARNING: redefining SHOW-FRAME-INDICATOR in DEFUN
STYLE-WARNING: redefining ECHO-IN-WINDOW in DEFUN
STYLE-WARNING: redefining PUSH-LAST-MESSAGE in DEFUN
STYLE-WARNING: redefining ECHO-NTH-LAST-MESSAGE in DEFUN
STYLE-WARNING: redefining ECHO-STRING-LIST in DEFUN
STYLE-WARNING: redefining ECHO-STRING in DEFUN
STYLE-WARNING: redefining CURRENT-SCREEN in DEFUN
STYLE-WARNING: redefining INIT-SCREEN in DEFUN
STYLE-WARNING: redefining KEY-TO-KEYCODE+STATE in DEFUN
STYLE-WARNING: redefining SEND-FAKE-KEY in DEFUN
STYLE-WARNING: redefining SEND-FAKE-CLICK in DEFUN
STYLE-WARNING: redefining GRAB-POINTER in DEFUN
STYLE-WARNING: redefining UNGRAB-POINTER in DEFUN
STYLE-WARNING: redefining GRAB-KEYBOARD in DEFUN
STYLE-WARNING: redefining UNGRAB-KEYBOARD in DEFUN
STYLE-WARNING: redefining WARP-POINTER in DEFUN
STYLE-WARNING: redefining WARP-POINTER-RELATIVE in DEFUN
STYLE-WARNING: redefining HANDLE-UNMANAGED-WINDOW in DEFUN
STYLE-WARNING: redefining HANDLE-MANAGED-WINDOW in DEFUN
STYLE-WARNING: redefining READ-FROM-KEYMAP in DEFUN
STYLE-WARNING: redefining HANDLE-KEYMAP in DEFUN
STYLE-WARNING: redefining BYTES-TO-WINDOW in DEFUN
STYLE-WARNING: redefining HANDLE-RP-COMMANDS in DEFUN
STYLE-WARNING: redefining UPDATE-WINDOW-PROPERTIES in DEFUN
STYLE-WARNING: redefining HANDLE-EVENT in DEFUN
STYLE-WARNING: redefining EXPORT-SELECTION in DEFUN
STYLE-WARNING: redefining SET-X-SELECTION in DEFUN
STYLE-WARNING: redefining SEND-SELECTION in DEFUN
STYLE-WARNING: redefining GET-X-SELECTION in DEFUN
STYLE-WARNING: redefining PUSH-TOP-MAP in DEFUN
STYLE-WARNING: redefining POP-TOP-MAP in DEFUN
; compiling file "/home/plutonas/stumpwm/user.lisp" (written 26 JAN 2007 06:03:49 PM):
; compiling (IN-PACKAGE :STUMPWM)
; compiling (DEFVAR *ROOT-MAP* ...)
; compiling (WHEN (NULL *ROOT-MAP*) ...)
; compiling (DEFSTRUCT COMMAND ...)
; compiling (DEFVAR *COMMAND-HASH* ...)
; compiling (DEFMACRO DEFINE-STUMPWM-COMMAND ...)
; compiling (DEFUN ALL-COMMANDS ...)
; compiling (DEFUN FOCUS-NEXT-WINDOW ...)
; compiling (DEFUN FOCUS-PREV-WINDOW ...)
; compiling (DEFINE-STUMPWM-COMMAND "next" ...)
; compiling (DEFINE-STUMPWM-COMMAND "prev" ...)
; compiling (DEFUN PULL-WINDOW ...)
; compiling (DEFUN FOCUS-FORWARD ...)
; compiling (DEFUN DELETE-CURRENT-WINDOW ...)
; compiling (DEFINE-STUMPWM-COMMAND "delete" ...)
; compiling (DEFUN KILL-CURRENT-WINDOW ...)
; compiling (DEFINE-STUMPWM-COMMAND "kill" ...)
; compiling (DEFUN BANISH-POINTER ...)
; compiling (DEFINE-STUMPWM-COMMAND "banish" ...)
; compiling (DEFINE-STUMPWM-COMMAND "ratwarp" ...)
; compiling (DEFINE-STUMPWM-COMMAND "ratrelwarp" ...)
; compiling (DEFINE-STUMPWM-COMMAND "ratclick" ...)
; compiling (DEFUN ECHO-WINDOWS ...)
; compiling (DEFUN FMT-WINDOW-LIST ...)
; compiling (DEFUN FMT-GROUP-LIST ...)
; compiling (DEFINE-STUMPWM-COMMAND "windows" ...)
; compiling (DEFUN FORMAT-TIME-STRING ...)
; compiling (DEFUN ECHO-DATE ...)
; compiling (DEFINE-STUMPWM-COMMAND "time" ...)
; compiling (DEFUN SELECT-WINDOW ...)
; compiling (DEFINE-STUMPWM-COMMAND "select" ...)
; compiling (DEFUN SELECT-WINDOW-NUMBER ...)
; compiling (DEFUN OTHER-WINDOW ...)
; compiling (DEFINE-STUMPWM-COMMAND "other" ...)
; compiling (DEFUN PROGRAMS-IN-PATH ...)
; compiling (DEFUN RUN-SHELL-COMMAND ...)
; compiling (DEFINE-STUMPWM-COMMAND "exec" ...)
; compiling (DEFUN HORIZ-SPLIT-FRAME ...)
; compiling (DEFINE-STUMPWM-COMMAND "hsplit" ...)
; compiling (DEFUN VERT-SPLIT-FRAME ...)
; compiling (DEFINE-STUMPWM-COMMAND "vsplit" ...)
; compiling (DEFUN REMOVE-SPLIT ...)
; compiling (DEFINE-STUMPWM-COMMAND "remove" ...)
; compiling (DEFINE-STUMPWM-COMMAND "only" ...)
; compiling (DEFINE-STUMPWM-COMMAND "curframe" ...)
; compiling (DEFUN FOCUS-FRAME-SIBLING ...)
; compiling (DEFUN FOCUS-LAST-FRAME ...)
; compiling (DEFUN FOCUS-FRAME-AFTER ...)
; compiling (DEFUN FOCUS-NEXT-FRAME ...)
; compiling (DEFUN FOCUS-PREV-FRAME ...)
; compiling (DEFINE-STUMPWM-COMMAND "fnext" ...)
; compiling (DEFINE-STUMPWM-COMMAND "sibling" ...)
; compiling (DEFINE-STUMPWM-COMMAND "fother" ...)
; compiling (DEFUN CHOOSE-FRAME-BY-NUMBER ...)
; compiling (DEFINE-STUMPWM-COMMAND "fselect" ...)
; compiling (DEFINE-STUMPWM-COMMAND "resize" ...)
; compiling (DEFUN EVAL-LINE ...)
; compiling (DEFINE-STUMPWM-COMMAND "eval" ...)
; compiling (DEFINE-STUMPWM-COMMAND "echo" ...)
; compiling (DEFUN SPLIT-BY-ONE-SPACE ...)
; compiling (DEFSTRUCT ARGUMENT-LINE ...)
; compiling (DEFVAR *COMMAND-TYPE-HASH* ...)
; compiling (DEFUN ARGUMENT-LINE-END-P ...)
; compiling (DEFUN ARGUMENT-POP ...)
; compiling (DEFUN ARGUMENT-POP-OR-READ ...)
; compiling (DEFUN ARGUMENT-POP-REST ...)
; compiling (DEFUN ARGUMENT-POP-REST-OR-READ ...)
; compiling (DEFMACRO DEFINE-STUMPWM-TYPE ...)
; compiling (DEFINE-STUMPWM-TYPE :WINDOW-NUMBER ...)
; compiling (DEFINE-STUMPWM-TYPE :NUMBER ...)
; compiling (DEFINE-STUMPWM-TYPE :STRING ...)
; compiling (DEFINE-STUMPWM-TYPE :KEY ...)
; compiling (DEFINE-STUMPWM-TYPE :WINDOW-NAME ...)
; compiling (DEFINE-STUMPWM-TYPE :GROUP-NAME ...)
; compiling (DEFINE-STUMPWM-TYPE :GROUP ...)
; compiling (DEFINE-STUMPWM-TYPE :FRAME ...)
; compiling (DEFINE-STUMPWM-TYPE :SHELL ...)
; compiling (DEFINE-STUMPWM-TYPE :REST ...)
; compiling (DEFUN PARSE-AND-RUN-COMMAND ...)
; compiling (DEFUN INTERACTIVE-COMMAND ...)
; compiling (DEFINE-STUMPWM-COMMAND "colon" ...)
; compiling (DEFUN PULL-WINDOW-BY-NUMBER ...)
; compiling (DEFINE-STUMPWM-COMMAND "pull" ...)
; compiling (DEFUN SEND-META-KEY ...)
; compiling (DEFINE-STUMPWM-COMMAND "meta" ...)
; compiling (DEFUN RENUMBER ...)
; compiling (DEFINE-STUMPWM-COMMAND "number" ...)
; compiling (DEFINE-STUMPWM-COMMAND "reload" ...)
; compiling (DEFINE-STUMPWM-COMMAND "loadrc" ...)
; compiling (DEFUN DISPLAY-KEYBINDING ...)
; compiling (DEFINE-STUMPWM-COMMAND "help" ...)
; compiling (DEFINE-STUMPWM-COMMAND "abort" ...)
; compiling (DEFUN SET-PREFIX-KEY ...)
; compiling (DEFINE-STUMPWM-COMMAND "quit" ...)
; compiling (DEFUN CLEAR-FRAME ...)
; compiling (DEFINE-STUMPWM-COMMAND "fclear" ...)
; compiling (DEFUN FIND-CLOSEST-FRAME ...)
; compiling (DEFINE-STUMPWM-COMMAND "move-focus" ...)
; compiling (DEFUN RUN-OR-RAISE ...)
; compiling (DEFINE-STUMPWM-COMMAND "shell" ...)
; compiling (DEFINE-STUMPWM-COMMAND "web" ...)
; compiling (DEFINE-STUMPWM-COMMAND "escape" ...)
; compiling (DEFVAR *LASTMSG-NTH* ...)
; compiling (DEFINE-STUMPWM-COMMAND "lastmsg" ...)
; compiling (DEFVAR *RESIZE-MAP* ...)
; compiling (DEFVAR *RESIZE-BACKUP* ...)
; compiling (WHEN (NULL *RESIZE-MAP*) ...)
; compiling (DEFINE-STUMPWM-COMMAND "iresize" ...)
; compiling (DEFINE-STUMPWM-COMMAND "abort-iresize" ...)
; compiling (DEFINE-STUMPWM-COMMAND "exit-iresize" ...)
; compiling (DEFVAR *GROUPS-MAP* ...)
; compiling (WHEN (NULL *GROUPS-MAP*) ...)
; compiling (DEFUN GROUP-FORWARD ...)
; compiling (DEFINE-STUMPWM-COMMAND "gnew" ...)
; compiling (DEFINE-STUMPWM-COMMAND "gnewbg" ...)
; compiling (DEFINE-STUMPWM-COMMAND "gnext" ...)
; compiling (DEFINE-STUMPWM-COMMAND "gprev" ...)
; compiling (DEFUN ECHO-GROUPS ...)
; compiling (DEFINE-STUMPWM-COMMAND "groups" ...)
; compiling (DEFINE-STUMPWM-COMMAND "vgroups" ...)
; compiling (DEFUN SELECT-GROUP ...)
; compiling (DEFINE-STUMPWM-COMMAND "gselect" ...)
; compiling (DEFINE-STUMPWM-COMMAND "gmove" ...)
; compiling (DEFINE-STUMPWM-COMMAND "gkill" ...)
; compiling (DEFVAR *MENU-MAP* ...)
; compiling (WHEN (NULL *MENU-MAP*) ...)
; compiling (DEFSTRUCT MENU-STATE ...)
; compiling (DEFUN BOUND-CHECK-MENU ...)
; compiling (DEFUN MENU-UP ...)
; compiling (DEFUN MENU-DOWN ...)
; compiling (DEFUN MENU-FINISH ...)
; compiling (DEFUN MENU-ABORT ...)
; compiling (DEFUN SELECT-FROM-MENU ...)
; compiling (DEFINE-STUMPWM-COMMAND "windowlist" ...)
; compiling (DEFUN RUN-COMMANDS ...)
; compiling (DEFINE-STUMPWM-COMMAND "snext" ...)
; compiling (DEFINE-STUMPWM-COMMAND "sprev" ...)
; compiling (DEFINE-STUMPWM-COMMAND "sother" ...)
; compiling (DEFUN WINDOW-SEND-STRING ...)
; compiling (DEFINE-STUMPWM-COMMAND "insert" ...)
; compiling (DEFINE-STUMPWM-COMMAND "putsel" ...)
; compiling (DEFINE-STUMPWM-COMMAND "getsel" ...)
; compiling (DEFUN OTHER-HIDDEN-WINDOW ...)
; file: /home/plutonas/stumpwm/user.lisp
; in: DEFUN OTHER-HIDDEN-WINDOW
; (LET* ((STUMPWM::F (STUMPWM::TILE-GROUP-CURRENT-FRAME STUMPWM::GROUP))
; (STUMPWM::WINS
; (REMOVE-IF (LAMBDA # #) (STUMPWM::GROUP-WINDOWS STUMPWM::GROUP)))
; (STUMPWM::WIN (FIRST STUMPWM::WINS)))
; (IF STUMPWM::WIN (STUMPWM::PULL-WINDOW STUMPWM::WIN)
; (STUMPWM:ECHO-STRING (STUMPWM::GROUP-SCREEN STUMPWM::GROUP)
; "No other window.")))
;
; caught STYLE-WARNING:
; The variable F is defined but never used.
; compiling (DEFUN OTHER-WINDOW-IN-FRAME ...)
; compiling (DEFINE-STUMPWM-COMMAND "pull-hidden-next" ...)
; compiling (DEFINE-STUMPWM-COMMAND "pull-hidden-previous" ...)
; compiling (DEFINE-STUMPWM-COMMAND "pull-hidden-other" ...)
; compiling (DEFINE-STUMPWM-COMMAND "next-in-frame" ...)
; compiling (DEFINE-STUMPWM-COMMAND "prev-in-frame" ...)
; compiling (DEFINE-STUMPWM-COMMAND "other-in-frame" ...)
; compiling (DEFINE-STUMPWM-COMMAND "command-mode" ...)
; compiling (DEFINE-STUMPWM-COMMAND "mark" ...)
; compiling (DEFINE-STUMPWM-COMMAND "clear-marks" ...)
; compiling (DEFINE-STUMPWM-COMMAND "pull-marked" ...)
; /var/cache/common-lisp-controller/1000/sbcl/local/home/plutonas/stumpwm/user.fasl written
; compilation finished in 0:00:02
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {BC466A1}> on
#<CL-SOURCE-FILE "user" {A968021}>.
STYLE-WARNING: redefining MAKE-COMMAND in DEFUN
STYLE-WARNING: redefining ALL-COMMANDS in DEFUN
STYLE-WARNING: redefining FOCUS-NEXT-WINDOW in DEFUN
STYLE-WARNING: redefining FOCUS-PREV-WINDOW in DEFUN
STYLE-WARNING: redefining PULL-WINDOW in DEFUN
STYLE-WARNING: redefining FOCUS-FORWARD in DEFUN
STYLE-WARNING: redefining DELETE-CURRENT-WINDOW in DEFUN
STYLE-WARNING: redefining KILL-CURRENT-WINDOW in DEFUN
STYLE-WARNING: redefining BANISH-POINTER in DEFUN
STYLE-WARNING: redefining ECHO-WINDOWS in DEFUN
STYLE-WARNING: redefining FMT-WINDOW-LIST in DEFUN
STYLE-WARNING: redefining FMT-GROUP-LIST in DEFUN
STYLE-WARNING: redefining FORMAT-TIME-STRING in DEFUN
STYLE-WARNING: redefining ECHO-DATE in DEFUN
STYLE-WARNING: redefining SELECT-WINDOW in DEFUN
STYLE-WARNING: redefining SELECT-WINDOW-NUMBER in DEFUN
STYLE-WARNING: redefining OTHER-WINDOW in DEFUN
STYLE-WARNING: redefining PROGRAMS-IN-PATH in DEFUN
STYLE-WARNING: redefining RUN-SHELL-COMMAND in DEFUN
STYLE-WARNING: redefining HORIZ-SPLIT-FRAME in DEFUN
STYLE-WARNING: redefining VERT-SPLIT-FRAME in DEFUN
STYLE-WARNING: redefining REMOVE-SPLIT in DEFUN
STYLE-WARNING: redefining FOCUS-FRAME-SIBLING in DEFUN
STYLE-WARNING: redefining FOCUS-LAST-FRAME in DEFUN
STYLE-WARNING: redefining FOCUS-FRAME-AFTER in DEFUN
STYLE-WARNING: redefining FOCUS-NEXT-FRAME in DEFUN
STYLE-WARNING: redefining FOCUS-PREV-FRAME in DEFUN
STYLE-WARNING: redefining CHOOSE-FRAME-BY-NUMBER in DEFUN
STYLE-WARNING: redefining EVAL-LINE in DEFUN
STYLE-WARNING: redefining SPLIT-BY-ONE-SPACE in DEFUN
STYLE-WARNING: redefining MAKE-ARGUMENT-LINE in DEFUN
STYLE-WARNING: redefining ARGUMENT-LINE-END-P in DEFUN
STYLE-WARNING: redefining ARGUMENT-POP in DEFUN
STYLE-WARNING: redefining ARGUMENT-POP-OR-READ in DEFUN
STYLE-WARNING: redefining ARGUMENT-POP-REST in DEFUN
STYLE-WARNING: redefining ARGUMENT-POP-REST-OR-READ in DEFUN
STYLE-WARNING: redefining PARSE-AND-RUN-COMMAND in DEFUN
STYLE-WARNING: redefining INTERACTIVE-COMMAND in DEFUN
STYLE-WARNING: redefining PULL-WINDOW-BY-NUMBER in DEFUN
STYLE-WARNING: redefining SEND-META-KEY in DEFUN
STYLE-WARNING: redefining RENUMBER in DEFUN
STYLE-WARNING: redefining DISPLAY-KEYBINDING in DEFUN
STYLE-WARNING: redefining SET-PREFIX-KEY in DEFUN
STYLE-WARNING: redefining CLEAR-FRAME in DEFUN
STYLE-WARNING: redefining FIND-CLOSEST-FRAME in DEFUN
STYLE-WARNING: redefining RUN-OR-RAISE in DEFUN
STYLE-WARNING: redefining GROUP-FORWARD in DEFUN
STYLE-WARNING: redefining ECHO-GROUPS in DEFUN
STYLE-WARNING: redefining SELECT-GROUP in DEFUN
STYLE-WARNING: redefining MAKE-MENU-STATE in DEFUN
STYLE-WARNING: redefining BOUND-CHECK-MENU in DEFUN
STYLE-WARNING: redefining MENU-UP in DEFUN
STYLE-WARNING: redefining MENU-DOWN in DEFUN
STYLE-WARNING: redefining MENU-FINISH in DEFUN
STYLE-WARNING: redefining MENU-ABORT in DEFUN
STYLE-WARNING: redefining SELECT-FROM-MENU in DEFUN
STYLE-WARNING: redefining RUN-COMMANDS in DEFUN
STYLE-WARNING: redefining WINDOW-SEND-STRING in DEFUN
STYLE-WARNING: redefining OTHER-HIDDEN-WINDOW in DEFUN
STYLE-WARNING: redefining OTHER-WINDOW-IN-FRAME in DEFUN
; compiling file "/home/plutonas/stumpwm/mode-line.lisp" (written 26 JAN 2007 12:54:12 AM):
; compiling (IN-PACKAGE "STUMPWM")
; compiling (DEFSTRUCT MODE-LINE ...)
; compiling (DEFVAR *MODE-LINE-SCREEN-POSITION* ...)
; compiling (DEFVAR *MODE-LINE-FRAME-POSITION* ...)
; compiling (DEFVAR *MODE-LINE-BORDER-WIDTH* ...)
; compiling (DEFVAR *MODE-LINE-PAD-X* ...)
; compiling (DEFVAR *MODE-LINE-PAD-Y* ...)
; compiling (DEFVAR *MODE-LINE-BACKGROUND-COLOR* ...)
; compiling (DEFVAR *MODE-LINE-FOREGROUND-COLOR* ...)
; compiling (DEFVAR *MODE-LINE-BORDER-COLOR* ...)
; compiling (DEFVAR *SCREEN-MODE-LINE-FORMAT* ...)
; compiling (DEFVAR *SCREEN-MODE-LINE-FORMATTERS* ...)
; compiling (DEFVAR *CURRENT-MODE-LINE-FORMATTERS* ...)
; compiling (DEFVAR *CURRENT-MODE-LINE-FORMATTER-ARGS* ...)
; compiling (DEFUN MAKE-MODE-LINE-WINDOW ...)
; compiling (DEFGENERIC RESIZE-MODE-LINE-FOR ...)
; compiling (DEFMETHOD RESIZE-MODE-LINE-FOR ...)
; compiling (DEFGENERIC MODE-LINE-FORMAT-ELT ...)
; compiling (DEFMETHOD MODE-LINE-FORMAT-ELT ...)
; compiling (DEFMETHOD MODE-LINE-FORMAT-ELT ...)
; compiling (DEFMETHOD MODE-LINE-FORMAT-ELT ...)
; compiling (DEFMETHOD MODE-LINE-FORMAT-ELT ...)
; compiling (DEFUN MODE-LINE-FORMAT-STRING ...)
; compiling (DEFUN MAKE-MODE-LINE-GC ...)
; compiling (DEFUN MAKE-SCREEN-MODE-LINE ...)
; compiling (DEFGENERIC REDRAW-MODE-LINE-FOR ...)
; compiling (DEFMETHOD REDRAW-MODE-LINE-FOR ...)
; compiling (DEFUN TOGGLE-MODE-LINE ...)
; compiling (DEFUN SCREEN-MODE-LINE-MODE ...)
; compiling (DEFINE-STUMPWM-COMMAND "mode-line" ...)
; /var/cache/common-lisp-controller/1000/sbcl/local/home/plutonas/stumpwm/mode-line.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: redefining MAKE-MODE-LINE in DEFUN
STYLE-WARNING: redefining MAKE-MODE-LINE-WINDOW in DEFUN
STYLE-WARNING: redefining RESIZE-MODE-LINE-FOR in DEFGENERIC
STYLE-WARNING: redefining RESIZE-MODE-LINE-FOR (T SCREEN) in DEFMETHOD
STYLE-WARNING: redefining MODE-LINE-FORMAT-ELT in DEFGENERIC
STYLE-WARNING: redefining MODE-LINE-FORMAT-ELT (STRING) in DEFMETHOD
STYLE-WARNING: redefining MODE-LINE-FORMAT-ELT (SYMBOL) in DEFMETHOD
STYLE-WARNING: redefining MODE-LINE-FORMAT-ELT (NULL) in DEFMETHOD
STYLE-WARNING: redefining MODE-LINE-FORMAT-ELT (LIST) in DEFMETHOD
STYLE-WARNING: redefining MODE-LINE-FORMAT-STRING in DEFUN
STYLE-WARNING: redefining MAKE-MODE-LINE-GC in DEFUN
STYLE-WARNING: redefining MAKE-SCREEN-MODE-LINE in DEFUN
STYLE-WARNING: redefining REDRAW-MODE-LINE-FOR in DEFGENERIC
STYLE-WARNING: redefining REDRAW-MODE-LINE-FOR (T SCREEN) in DEFMETHOD
STYLE-WARNING: redefining TOGGLE-MODE-LINE in DEFUN
STYLE-WARNING: redefining SCREEN-MODE-LINE-MODE in DEFUN
; compiling file "/home/plutonas/stumpwm/stumpwm.lisp" (written 27 JAN 2007 10:33:51 AM):
; compiling (IN-PACKAGE :STUMPWM)
; compiling (DEFUN LOAD-RC-FILE ...)
; compiling (DEFUN INIT-ATOMS ...)
; compiling (DEFUN ERROR-HANDLER ...)
; compiling (DEFUN STUMPWM-INTERNAL-LOOP ...)
; compiling (DEFUN PARSE-DISPLAY-STRING ...)
; compiling (DEFUN STUMPWM ...)
; /var/cache/common-lisp-controller/1000/sbcl/local/home/plutonas/stumpwm/stumpwm.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: redefining LOAD-RC-FILE in DEFUN
STYLE-WARNING: redefining INIT-ATOMS in DEFUN
STYLE-WARNING: redefining ERROR-HANDLER in DEFUN
STYLE-WARNING: redefining STUMPWM-INTERNAL-LOOP in DEFUN
STYLE-WARNING: redefining PARSE-DISPLAY-STRING in DEFUN
STYLE-WARNING: redefining STUMPWM in DEFUN
; compiling file "/home/plutonas/stumpwm/version.lisp" (written 10 JAN 2007 01:07:17 AM):
; compiling (IN-PACKAGE :STUMPWM)
; compiling (DEFPARAMETER *VERSION* ...)
; compiling (DEFUN ECHO-VERSION ...)
; compiling (DEFINE-STUMPWM-COMMAND "version" ...)
; /var/cache/common-lisp-controller/1000/sbcl/local/home/plutonas/stumpwm/version.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: redefining ECHO-VERSION in DEFUN
;
; compilation unit finished
; caught 1 STYLE-WARNING condition
22:51:17 <<< :KEY-PRESS
22:51:17 >>> :FOCUS-OUT
22:51:17 <<< :FOCUS-OUT
22:51:17 >>> :FOCUS-IN
22:51:17 <<< :FOCUS-IN
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :WM_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_ICON_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :WM_ICON_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :MAP-NOTIFY
22:51:17 <<< :MAP-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :FOCUS-OUT
22:51:17 <<< :FOCUS-OUT
22:51:17 >>> :FOCUS-IN
22:51:17 <<< :FOCUS-IN
22:51:17 >>> :UNMAP-NOTIFY
22:51:17 UNMAP: NIL T
22:51:17 <<< :UNMAP-NOTIFY
22:51:17 >>> :MAP-NOTIFY
22:51:17 <<< :MAP-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :WM_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_ICON_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :WM_ICON_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_USER_TIME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:17 >>> :KEY-PRESS
22:51:17 Awaiting key #<HASH-TABLE :TEST EQUALP :COUNT 3 {BB45589}>
22:51:17 key-press: #S(STUMPWM::KEY
:KEYSYM 65361
:SHIFT NIL
:CONTROL T
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 4 "snext"
22:51:17 arguments: NIL
22:51:17 <<< :KEY-PRESS
22:51:17 >>> :FOCUS-OUT
22:51:17 <<< :FOCUS-OUT
22:51:17 >>> :FOCUS-IN
22:51:17 <<< :FOCUS-IN
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :WM_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :_NET_WM_ICON_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :PROPERTY-NOTIFY
22:51:17 property notify #<XLIB:WINDOW :0 E00239> :WM_ICON_NAME :NEW-VALUE
22:51:17 find-window!
22:51:17 <<< :PROPERTY-NOTIFY
22:51:17 >>> :UNMAP-NOTIFY
22:51:17 UNMAP: NIL T
22:51:17 <<< :UNMAP-NOTIFY
22:51:17 >>> :FOCUS-OUT
22:51:17 <<< :FOCUS-OUT
22:51:17 >>> :FOCUS-IN
22:51:17 <<< :FOCUS-IN
22:51:17 >>> :MAP-NOTIFY
22:51:17 <<< :MAP-NOTIFY
22:51:17 >>> :CONFIGURE-NOTIFY
22:51:17 <<< :CONFIGURE-NOTIFY
22:51:18 >>> :KEY-PRESS
22:51:18 Awaiting key #<HASH-TABLE :TEST EQUALP :COUNT 3 {BB45589}>
22:51:18 key-press: #S(STUMPWM::KEY
:KEYSYM 116
:SHIFT NIL
:CONTROL T
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 4 STUMPWM:*ROOT-MAP*
22:51:18 Awaiting key *ROOT-MAP*
22:51:18 key-press: #S(STUMPWM::KEY
:KEYSYM 110
:SHIFT NIL
:CONTROL T
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 4 "next"
22:51:18 arguments: NIL
22:51:18 hide window: mlterm
22:51:18 hide window: mlterm
22:51:18 <<< :KEY-PRESS
22:51:18 >>> :UNMAP-NOTIFY
22:51:18 UNMAP: NIL T
22:51:18 <<< :UNMAP-NOTIFY
22:51:18 >>> :FOCUS-OUT
22:51:18 <<< :FOCUS-OUT
22:51:18 >>> :FOCUS-IN
22:51:18 <<< :FOCUS-IN
22:51:18 >>> :MAP-NOTIFY
22:51:18 <<< :MAP-NOTIFY
22:51:18 >>> :PROPERTY-NOTIFY
22:51:18 property notify #<XLIB:WINDOW :0 1000041> :WM_STATE :NEW-VALUE
22:51:18 find-window!
22:51:18 <<< :PROPERTY-NOTIFY
22:51:18 >>> :CONFIGURE-NOTIFY
22:51:18 <<< :CONFIGURE-NOTIFY
22:51:18 >>> :FOCUS-OUT
22:51:18 <<< :FOCUS-OUT
22:51:18 >>> :FOCUS-IN
22:51:18 <<< :FOCUS-IN
22:51:18 >>> :PROPERTY-NOTIFY
22:51:18 property notify #<XLIB:WINDOW :0 800004> :WM_STATE :NEW-VALUE
22:51:18 find-window!
22:51:18 <<< :PROPERTY-NOTIFY
22:51:18 >>> :UNMAP-NOTIFY
22:51:18 UNMAP: NIL T
22:51:18 <<< :UNMAP-NOTIFY
22:51:18 >>> :PROPERTY-NOTIFY
22:51:18 property notify #<XLIB:WINDOW :0 800004> :WM_STATE :NEW-VALUE
22:51:18 find-window!
22:51:18 <<< :PROPERTY-NOTIFY
22:51:19 >>> :PROPERTY-NOTIFY
22:51:19 property notify #<XLIB:WINDOW :0 1000041> :_NET_WM_USER_TIME :NEW-VALUE
22:51:19 find-window!
22:51:19 <<< :PROPERTY-NOTIFY
22:51:19 >>> :KEY-PRESS
22:51:19 Awaiting key #<HASH-TABLE :TEST EQUALP :COUNT 3 {BB45589}>
22:51:19 key-press: #S(STUMPWM::KEY
:KEYSYM 116
:SHIFT NIL
:CONTROL T
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 4 STUMPWM:*ROOT-MAP*
22:51:19 Awaiting key *ROOT-MAP*
22:51:19 key-press: #S(STUMPWM::KEY
:KEYSYM 110
:SHIFT NIL
:CONTROL T
:META NIL
:ALT NIL
:HYPER NIL
:SUPER NIL) 4 "next"
22:51:19 arguments: NIL
22:51:19 hide window: Conkeror
22:51:19 hide window: Conkeror
22:51:19 <<< :KEY-PRESS
22:51:19 >>> :FOCUS-OUT
22:51:19 <<< :FOCUS-OUT
22:51:19 >>> :FOCUS-IN
22:51:19 <<< :FOCUS-IN
22:51:19 >>> :MAP-NOTIFY
22:51:19 <<< :MAP-NOTIFY
22:51:19 >>> :PROPERTY-NOTIFY
22:51:19 property notify #<XLIB:WINDOW :0 600004> :WM_STATE :NEW-VALUE
22:51:19 find-window!
22:51:19 <<< :PROPERTY-NOTIFY
22:51:19 >>> :CONFIGURE-NOTIFY
22:51:19 <<< :CONFIGURE-NOTIFY
22:51:19 >>> :FOCUS-OUT
22:51:19 <<< :FOCUS-OUT
22:51:19 >>> :FOCUS-IN
22:51:19 <<< :FOCUS-IN
22:51:19 >>> :PROPERTY-NOTIFY
22:51:19 property notify #<XLIB:WINDOW :0 1000041> :WM_STATE :NEW-VALUE
22:51:19 find-window!
22:51:19 <<< :PROPERTY-NOTIFY
22:51:19 >>> :UNMAP-NOTIFY
22:51:19 UNMAP: NIL T
22:51:19 <<< :UNMAP-NOTIFY
22:51:19 >>> :PROPERTY-NOTIFY
22:51:19 property notify #<XLIB:WINDOW :0 1000041> :WM_STATE :NEW-VALUE
22:51:19 find-window!
22:51:19 <<< :PROPERTY-NOTIFY
22:51:20 >>> :CREATE-NOTIFY
22:51:20 <<< :CREATE-NOTIFY
22:51:20 >>> :MAP-REQUEST
22:51:20 find-window!
22:51:20 Free number: (1 2 3)
22:51:20 maximize window #S<window "MPlayer"> x: 0 y: 86 width: 1278 height: 850 stick: T
22:51:20 hide window: mlterm
22:51:20 <<< :MAP-REQUEST
22:51:20 >>> :CREATE-NOTIFY
22:51:20 <<< :CREATE-NOTIFY
22:51:20 >>> :REPARENT-NOTIFY
22:51:20 <<< :REPARENT-NOTIFY
22:51:20 >>> :REPARENT-NOTIFY
22:51:20 <<< :REPARENT-NOTIFY
22:51:20 >>> :REPARENT-NOTIFY
22:51:20 <<< :REPARENT-NOTIFY
22:51:20 >>> :MAP-NOTIFY
22:51:20 <<< :MAP-NOTIFY
22:51:20 >>> :CONFIGURE-NOTIFY
22:51:20 <<< :CONFIGURE-NOTIFY
22:51:20 >>> :CONFIGURE-NOTIFY
22:51:20 <<< :CONFIGURE-NOTIFY
22:51:20 >>> :CONFIGURE-NOTIFY
22:51:20 <<< :CONFIGURE-NOTIFY
22:51:20 >>> :CONFIGURE-NOTIFY
22:51:20 <<< :CONFIGURE-NOTIFY
22:51:20 >>> :CONFIGURE-NOTIFY
22:51:20 <<< :CONFIGURE-NOTIFY
22:51:20 >>> :CONFIGURE-NOTIFY
22:51:20 <<< :CONFIGURE-NOTIFY
22:51:20 >>> :MAP-NOTIFY
22:51:20 <<< :MAP-NOTIFY
22:51:20 >>> :MAP-NOTIFY
22:51:20 <<< :MAP-NOTIFY
22:51:20 >>> :FOCUS-OUT
22:51:20 <<< :FOCUS-OUT
22:51:20 >>> :FOCUS-IN
22:51:20 <<< :FOCUS-IN
22:51:20 >>> :PROPERTY-NOTIFY
22:51:20 property notify #<XLIB:WINDOW :0 1600002> :WM_NORMAL_HINTS :NEW-VALUE
22:51:20 find-window!
22:51:20 new hints: #<XLIB:WM-SIZE-HINTS {AA15019}>
22:51:20 maximize window #S<window "MPlayer"> x: 0 y: 86 width: 1278 height: 850 stick: T
22:51:20 <<< :PROPERTY-NOTIFY
22:51:20 >>> :PROPERTY-NOTIFY
22:51:20 property notify #<XLIB:WINDOW :0 600004> :WM_STATE :NEW-VALUE
22:51:20 find-window!
22:51:20 <<< :PROPERTY-NOTIFY
22:51:20 >>> :UNMAP-NOTIFY
22:51:20 UNMAP: NIL T
22:51:20 <<< :UNMAP-NOTIFY
22:51:23 >>> :UNMAP-NOTIFY
22:51:23 UNMAP: NIL NIL
22:51:23 find-window!
22:51:23 remove window #S<screen #<XLIB:SCREEN :0.1 1280x1024x24 TRUE-COLOR>>
22:51:23 destroying parent window
22:51:23 destroyed.
22:51:23 <<< :UNMAP-NOTIFY
22:51:23 >>> :UNMAP-NOTIFY
22:51:23 UNMAP: NIL T
22:51:23 <<< :UNMAP-NOTIFY
22:51:23 >>> :FOCUS-OUT
22:51:23 <<< :FOCUS-OUT
22:51:23 >>> :UNMAP-NOTIFY
22:51:23 UNMAP: T T
22:51:23 find-window!
22:51:23 <<< :UNMAP-NOTIFY
22:51:23 >>> :PROPERTY-NOTIFY
22:51:23 property notify #<XLIB:WINDOW :0 1600002> :_MOTIF_WM_HINTS :NEW-VALUE
22:51:23 find-window!
22:51:23 <<< :PROPERTY-NOTIFY
22:51:23 >>> :PROPERTY-NOTIFY
22:51:23 property notify #<XLIB:WINDOW :0 1600002> :WM_NORMAL_HINTS :NEW-VALUE
22:51:23 find-window!
22:51:23 <<< :PROPERTY-NOTIFY
22:51:23 >>> :CONFIGURE-REQUEST
22:51:23 CONFIGURE REQUEST 15 1024 850
22:51:23 find-window!
22:51:23 <<< :CONFIGURE-REQUEST
22:51:23 >>> :CONFIGURE-REQUEST
22:51:23 CONFIGURE REQUEST 64 850 1024
22:51:23 find-window!
22:51:23 <<< :CONFIGURE-REQUEST
22:51:23 >>> :MAP-REQUEST
22:51:23 find-window!