Don't fail when the function name is less than the 5 chr

Use a function provided on emacswiki for that :

http://www.emacswiki.org/emacs/ElispCookbook#toc4