57 lines
2.4 KiB
Plaintext
57 lines
2.4 KiB
Plaintext
|
# Variables
|
||
|
SetEnv QuakeConsole_Border "1"
|
||
|
|
||
|
CheckPreferences QuakeConsoleTerminal "SavePreferences QuakeConsoleTerminal 'FindCommand QuakeConsoleTerminal mrxvt urxvt aterm xterm'"
|
||
|
LoadPreferences QuakeConsoleTerminal
|
||
|
|
||
|
CheckPreferences QuakeConsoleHeight "SavePreferences QuakeConsoleHeight 'SetEnv QuakeConsole_Height 50'"
|
||
|
LoadPreferences QuakeConsoleHeight
|
||
|
|
||
|
CheckPreferences QuakeConsoleWidth "SavePreferences QuakeConsoleWidth 'SetEnv QuakeConsole_Width 96'"
|
||
|
LoadPreferences QuakeConsoleWidth
|
||
|
|
||
|
DestroyFunc QuakeConsole
|
||
|
AddToFunc QuakeConsole
|
||
|
+ I None (QuakeConsoleNeedsUniqueName) QuakeConsole_Init
|
||
|
+ I All (QuakeConsoleNeedsUniqueName, CurrentDesk) QuakeConsole_Hide
|
||
|
+ I TestRc (0) QuakeConsole_Show
|
||
|
|
||
|
DestroyFunc QuakeConsole_Init
|
||
|
AddToFunc QuakeConsole_Init
|
||
|
+ I Style QuakeConsoleNeedsUniqueName !Title, !Handles, SkipMapping, \
|
||
|
WindowListSkip, VariableSize, VariablePosition, NoIcon, StaysOnTop, \
|
||
|
!Iconifiable, EWMHMaximizeIgnoreWorkingArea, StickyAcrossPages, \
|
||
|
!Maximizable, BorderWidth $[QuakeConsole_Border], \
|
||
|
Colorset $[cs_quakeconsole], HilightColorset $[cs_quakeconsole], \
|
||
|
BorderColorset $[cs_quakeconsole], \
|
||
|
HilightBorderColorset $[cs_quakeconsole], WindowShadeSteps 8, \
|
||
|
WindowShadeShrinks
|
||
|
|
||
|
# If you want to change QuakeConsole command, do it here!
|
||
|
+ I Exec exec $[QuakeConsoleTerminal] -name QuakeConsoleNeedsUniqueName -geometry +0+0
|
||
|
# If you want to change QuakeConsole command, do it here!
|
||
|
|
||
|
+ I Wait QuakeConsoleNeedsUniqueName
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) Piperead 'echo Move `expr $[vp.width] / 50 `p `expr $[vp.height] / 2`p'
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) Resize $[QuakeConsole_Width] $[QuakeConsole_Height]
|
||
|
+ I Style QuakeConsoleNeedsUniqueName FixedPosition
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) MoveToDesk 0 666
|
||
|
+ I Style QuakeConsoleNeedsUniqueName !VariableSize, !Maximizable
|
||
|
+ I Prev (CurrentPage, AcceptsFocus, Visible) Focus
|
||
|
|
||
|
DestroyFunc QuakeConsole_Show
|
||
|
AddToFunc QuakeConsole_Show
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) MoveToDesk 0 $[desk.n]
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) Raise
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) Focus
|
||
|
|
||
|
DestroyFunc QuakeConsole_Hide
|
||
|
AddToFunc QuakeConsole_Hide
|
||
|
+ I All (QuakeConsoleNeedsUniqueName) MoveToDesk 0 666
|
||
|
+ I Window-FocusRemembered
|
||
|
|
||
|
Mouse (QuakeConsoleNeedsUniqueName) 2 W $[Mod1] QuakeConsole-Resize
|
||
|
|
||
|
# Dummy functions to avoid error messages
|
||
|
AddToFunc Window-FocusRemembered I Nop
|
||
|
AddToFunc Window-RememberFocused I Nop
|