Listing 2. Function to Set Titlebar

function proml
{ case $TERM in xterm*) local TITLEBAR="\[\e]0;\u@\h:\w\007\]" ;; *) local TITLEBAR="" ;; esac PS1="${TITLEBAR}\ [\$(date +%H%M)]\ [\u@\h:\w]\ \$ " PS2="> " }