wms/wms_clearer.sh

#!/bin/sh

## clean screen ##

. $HOME/.config/wms/wms_var

FLAG=$1
FW=$(pfw)                      # focused window 
CL=$(atomx WM_CL $FW)          # clearrer atom
UW=$(atomx WM_CL $(lsw -u))    # unmaped windows

if [ -n "$UW" ]; then # if unmaped windows
    mapw -m $UW    # map them
    atomx -d WM_CL $UW    # delete atom

else    # if no unmaped windows 
	for wid in $(lsw); do
	    atomx WM_CL=$wid $wid
	    mapw -u $wid
	done    # unmap the maped windows 
    fi