new text function 'abbr(str,maxlen)' to shorten text to maxlen,
does not cut words