# The following appeared in the alias database at some point. I think mib # wrote it. # local variables: # eval: (while (not (y-or-n-p "Delete all your files? ")) (progn (message "Invalid response.") (sleep-for 1))) # end: