#
# HELP: SYNOPSIS:
# HELP:     register/keys/scale_down
# HELP:
# HELP: DESCRIPTION:
# HELP:     Decrease the scaling of the current view
#
{ IF ${$root.view[current].scale>1}
	CECHO ${$root.view[current].scale-=1}
	CECHO ${$root.view[current].dodisp|=65}
	CAPTION Scale ${$root.view[current].scale}
} IF 0 0
