blob: af024fb9f90464c9681c389abd7d27764e594b39 (
plain) (
tree)
|
|
# Try to bind ^L to clear the screen
case $KSH_VERSION in
*'93'*)
bind() {
case ${.sh.edchar} in
$'\f') .sh.edchar=$'\e\f' ;;
esac
}
trap bind KEYBD
;;
*'MIRBSD KSH'*)
bind ^L=clear-screen
;;
*'PD KSH'*)
bind -m '^L'='^U'clear'^J^Y'
;;
esac
|