shrink-window

Name

shrink-window -- Shrink the window WIN to FRAC * its old size.

Synopsis

(shrink-window #&key (frac .99) (min-width 30) (min-height 45) (win (get-window)))

Description

Shrink the window WIN to FRAC * its old size. Never let it get smaller than MIN-WIDTH by MIN-HEIGHT.

Implementation Notes

Module: (app scwm auto-shrink)

Defined in scheme/auto-shrink.scm at line 22 (CVS log)