Signaling: (wrong-type-argument integerp ?A)
  message-make-caesar-translation-table(13)
  message-caesar-region(217 832 nil)
  message-caesar-buffer-body(nil)
  (let ((start ...) buffer-read-only) (message-caesar-buffer-body arg) (set-window-start (get-buffer-window ...) start))
)
  (save-restriction (widen) (let (... buffer-read-only) (message-caesar-buffer-body arg) (set-window-start ... start)))
)
  (progn (if w (progn ... ...) (pop-to-buffer buf)) (save-restriction (widen) (let ... ... ...)))
)
  (unwind-protect (progn (if w ... ...) (save-restriction ... ...)) (select-window GnusStartBufferWindow))
)
  (let* ((GnusStartBufferWindow ...) (buf gnus-article-buffer) (w ...)) (unwind-protect (progn ... ...) (select-window GnusStartBufferWindow)))
)
  (gnus-eval-in-buffer-window gnus-article-buffer (save-restriction (widen) (let ... ... ...)))
)
  (let ((mail-header-separator "")) (gnus-eval-in-buffer-window gnus-article-buffer (save-restriction ... ...)))
)
  gnus-summary-caesar-message(nil)
  call-interactively(gnus-summary-caesar-message)