diff options
author | Anton Khirnov <wyskas@gmail.com> | 2009-04-27 07:51:40 +0200 |
---|---|---|
committer | Anton Khirnov <wyskas@gmail.com> | 2009-04-27 07:51:40 +0200 |
commit | b727423e9d4b3bbedf8654e369e115c3c6c803ec (patch) | |
tree | ad70accf2e74c4133c237bf6ec65e3e7deda973b | |
parent | 62145af2fad915b0cbcef48e20060dc4461eb328 (diff) |
Remove some unused functions.
-rw-r--r-- | functions.config | 103 |
1 files changed, 1 insertions, 102 deletions
diff --git a/functions.config b/functions.config index df85b62..02083df 100644 --- a/functions.config +++ b/functions.config @@ -28,15 +28,6 @@ AddToFunc FvwmWindowMaximizeNoClick + I UpdateStyles + I Maximize $0 $1 $2 -DestroyFunc FvwmCheckSizeAndMaximizeIfBigWindow -AddToFunc FvwmCheckSizeAndMaximizeIfBigWindow -+ I SetEnv w_height $[w.height] -+ I Piperead 'echo SetEnv i $(($[height]-$[Y_offset]))' -+ I Piperead 'if [ "$[i]" -lt "$[w_height]" ]; then echo FvwmWindowMaximizeNoClick; fi' -+ I ThisWindow (FvwmWallpaperChanger) FvwmWindowMaximizeNoClick -+ I UnsetEnv w_height -+ I UnsetEnv i - DestroyFunc FvwmWindowResize AddToFunc FvwmWindowResize + C Resize @@ -46,10 +37,6 @@ AddToFunc FvwmWindowIconify + C Thumbnail #+ C Iconify $0 -DestroyFunc FvwmWindowIconifyNoClick -AddToFunc FvwmWindowIconifyNoClick -+ I Thumbnail - DestroyFunc FvwmWindowMove AddToFunc FvwmWindowMove + M ThisWindow (maximized) DestroyWindowStyle @@ -79,90 +66,21 @@ AddToFunc WindowListFunc + I Raise + I WarpToWindow 50 50 -DestroyFunc CentreWindow -AddToFunc CentreWindow -+ I SetEnv vp_width $[vp.width] -+ I SetEnv vp_height $[vp.height] -+ I SetEnv w_width $[w.width] -+ I SetEnv w_height $[w.height] -+ I PipeRead `echo $2Move screen c $$(((($[vp_width]-$[w_width])/2)-$0))p $$(((($[vp_height]-$[w_height])/2)-$1))p Warp` -+ I UnsetEnv vp_width -+ I UnsetEnv vp_height -+ I UnsetEnv w_width -+ I UnsetEnv w_height - DestroyFunc jiggle AddToFunc jiggle + I PipeRead "for y in `seq $0 -1 0`; do printf 'AnimatedMove w+%up w+%up\\nAnimatedMove w-%up w-%up\\n' ${y} ${y} ${y} ${y}; done" -DestroyFunc toggle_prog -AddToFunc toggle_prog -+ I None ($0, CirculateHit) Exec exec $1 -+ I Next ($0, CirculateHit) Close - DestroyFunc next_window_in_page AddToFunc next_window_in_page + I Raise + I FlipFocus + I WarpToWindow 50 50 -+ I ThisWindow (!maximized, !SDL_App) Jiggle 2 - -DestroyFunc FvwmNextWindowInPage -AddToFunc FvwmNextWindowInPage -+ I Next (CurrentPage, AcceptsFocus, !gkrellm, !FvwmTaskbar) Raise -+ I Next (CurrentPage, AcceptsFocus, !gkrellm, !FvwmTaskbar) Focus - -DestroyFunc FvwmPrevWindowInPage -AddToFunc FvwmPrevWindowInPage -+ I Prev (CurrentPage, AcceptsFocus, !gkrellm, !FvwmTaskbar) Focus -+ I Prev (CurrentPage, AcceptsFocus, !gkrellm, !FvwmTaskbar) Raise - -DestroyFunc page_info -AddToFunc page_info -+ I All (PageInfo) Close -+ I DestroyModuleConfig PageInfo: * -+ I Piperead 'echo SetEnv y $((($[height]-50-$[Y_offset])/2))' -+ I Piperead 'echo SetEnv x $((($[width]-100-$[X_offset])/2))' -+ I Style PageInfo !Title, BorderWidth 0, HandleWidth 0, WindowListSkip -+ I *PageInfo: Geometry 100x50+$[x]+$[y] -+ I *PageInfo: Colorset 6 -+ I *PageInfo: Font $[ThemeTitleFont] -+ I *PageInfo: (Title 'Page: $[page.nx],$[page.ny]', Action (Mouse 1) Nop) -+ I Module FvwmButtons PageInfo -+ I Wait PageInfo -+ I Schedule 500 All (PageInfo) Close -+ I UnsetEnv x -+ I UnsetEnv y ++ I ThisWindow (!maximized, !SDL_App) jiggle 2 ########################### # CONFIGURATION FUNCTIONS # ########################### -DestroyFunc ChangeFocusPolicy -AddToFunc ChangeFocusPolicy -+ I Piperead `echo SetEnv focus_policy $0 && echo $0 > $[FVWM_USERDIR]/config-options/focus_policy` -+ I Read $[FVWM_USERDIR]/styles.config -+ I Read $[FVWM_USERDIR]/menu/menu_Data.config - -DestroyFunc Fullscreen -AddToFunc Fullscreen -+ I ThisWindow (Maximized) Fullscreen-Stop -+ I TestRc (NoMatch) ThisWindow (!Maximized) Fullscreen-Start - -DestroyFunc Fullscreen-Start -AddToFunc Fullscreen-Start -+ I WindowStyle !Title, !Borders, !Iconifiable, ResizeHintOverride -+ I UpdateStyles -+ I Maximize ewmhiwa 100 100 -+ I WindowStyle !Maximizable, FixedSize, FixedPosition -+ I UpdateStyles - -DestroyFunc Fullscreen-Stop -AddToFunc Fullscreen-Stop -+ I DestroyWindowStyle -+ I UpdateStyles -+ I ThisWindow (Maximized) Maximize - DestroyFunc SlideshowOff AddToFunc SlideshowOff + I SetEnv slideshow 0 @@ -179,25 +97,6 @@ AddToFunc RandomWall + I Piperead '$[FVWM_USERDIR]/scripts/random_wallpaper.sh' + I Refresh -DestroyFunc Thumbnail -AddToFunc Thumbnail -+ I Raise -+ I ThisWindow (!Iconic) SetEnv Icon-$[w.id] $[w.iconfile] -+ I ThisWindow (!Shaded, Iconifiable, !Iconic) Piperead \ - "xwd -silent -id $[w.id] > $[FVWM_USERDIR]/tmp/icon.tmp.$[w.id].xwd" -+ I Iconify -+ I Exec convert $[FVWM_USERDIR]/tmp/icon.tmp.$[w.id].xwd -scale 128 -frame 1x1 \ - -mattecolor black -quality 0 png:$[FVWM_USERDIR]/tmp/icon.tmp.$[w.id].png && \ - FvwmCommand "WindowId $[w.id] WindowStyle IconOverride, Icon $[FVWM_USERDIR]/tmp/icon.tmp.$[w.id].png" - -DestroyFunc DeThumbnail -AddToFunc DeThumbnail -+ I PipeRead "echo Test \\(i \\$\\[Icon-$[w.id]\\]\\) WindowStyle Icon \\$\\[Icon-$[w.id]\\]" -+ I TestRc (NoMatch) WindowStyle NoIconOverride, Icon -+ I Exec rm -f $[FVWM_USERDIR]/tmp/icon.tmp.$[w.id].png -+ I All (Iconic, CurrentPage) PlaceAgain icon -+ I UnsetEnv Icon-$[w.id] - DestroyFunc MPDControl AddToFunc MPDControl + I Exec /bin/echo -e "$0\nclose"|nc localhost 6600 |