1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
|
# FvwmMiniConsole
# Variables
SetEnv FvwmConsoleTerminal "NO_FVWMCONSOLE_TERMINAL_FOUND"
#FindCommand FvwmConsoleTerminal xterm aterm urxvt mrxvt
LoadPreferences FvwmConsoleTerminal
Mouse (FvwmMiniConsoleNeedsUniqueName) 2 W $[Mod1] FvwmMiniConsole-Resize
DestroyFunc FvwmMiniConsole
AddToFunc FvwmMiniConsole
+ I None (FvwmMiniConsoleNeedsUniqueName) FvwmMiniConsole_Init
+ I All (FvwmMiniConsoleNeedsUniqueName, CurrentDesk, Focused) FvwmMiniConsole_Hide
+ I TestRc (0) FvwmMiniConsole_Show
DestroyFunc FvwmMiniConsole_Init
AddToFunc FvwmMiniConsole_Init
+ I Style FvwmMiniConsoleNeedsUniqueName !Title, !Borders, SkipMapping, WindowListSkip, \
VariableSize, VariablePosition, NoIcon, StaysOnTop, !Iconifiable, \
StickyAcrossPages, !Maximizable, NoHandles
+ I Style FvwmMiniConsoleNeedsUniqueName WindowShadeSteps 16
+ I Style FvwmMiniConsoleNeedsUniqueName WindowShadeShrinks
+ I Style FvwmMiniConsoleNeedsUniqueName TitleAtBottom
+ I Module FvwmConsole -terminal $[infostore.FvwmConsoleTerminal] -geometry 80x5+0-0 -title FvwmMiniConsoleNeedsUniqueName
+ I Wait FvwmMiniConsoleNeedsUniqueName
+ I Style FvwmMiniConsoleNeedsUniqueName FixedPosition
+ I All (FvwmMiniConsoleNeedsUniqueName) MoveToDesk 0 666
+ I Prev (CurrentPage) Focus
DestroyFunc FvwmMiniConsole_Show
AddToFunc FvwmMiniConsole_Show
+ I All (FvwmMiniConsoleNeedsUniqueName) MoveToDesk 0 $[desk.n]
#+ I All (FvwmMiniConsoleNeedsUniqueName) WindowShade false
+ I All (FvwmMiniConsoleNeedsUniqueName) Focus
DestroyFunc FvwmMiniConsole_Hide
AddToFunc FvwmMiniConsole_Hide
#+ I All (FvwmMiniConsoleNeedsUniqueName) WindowShade true South
+ I All (FvwmMiniConsoleNeedsUniqueName) MoveToDesk 0 666
#+ I All (FvwmMiniConsoleNeedsUniqueName) WindowShade false South
+ I Prev (CurrentPage, AcceptsFocus, Visible) Focus
DestroyFunc FvwmMiniConsole-Resize
AddToFunc FvwmMiniConsole-Resize
+ I Resize Direction NE
# vim:ft=fvwm
|