pass an arg to called-interactively-p