Erlkönig: delete-all-your-files.shtml

# 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: