@@ -35,9 +35,10 @@
   :group 'applications
   :prefix "sbbs-")
 
 (defcustom sbbs-boards
-  '(("textboard.org" ("sol" "prog") nil))
+  '(("textboard.org" ("sol" "prog") t)
+    ("bbs.jp.net" ("mona") t))
   "List of SchemeBBS sites and boards."
   :type '(repeat (list (string :tag "Board Domain")
                        (repeat (string :tag "Board Name"))
                        (boolean :tag "Use TLS?"))))