@@ -566,9 +566,10 @@
     map))
 
 (define-derived-mode sbbs-compose-mode text-mode "SchemeBBS Compose"
   "Major mode for composing replies and starting new threads."
+  (setq-local fill-column most-positive-fixnum)
   (message "Press C-c C-c to send"))
 
 (provide 'sbbs)
 
 ;;; sbbs.el ends here