Replace `current-time' shell function by ELisp equivalent