;{{{}}}
(deffun spell-it (
  save-file
  shell-command "spell "  "$ORIFILE "  ">.spelled newline-and-indent
  newline-and-indent
  beginning-of-line
  create-fold create-fold ".spelled
  open-file-fold
))
