Index: sbbs.el ================================================================== --- sbbs.el +++ sbbs.el @@ -41,13 +41,14 @@ (defcustom sbbs-boards '(("textboard.org" ("sol" "prog") t) ("bbs.jp.net" (("mona" . "")) t)) "List of SchemeBBS sites and boards." :type '(repeat (list (string :tag "Board Domain") - (repeat (or (string :tag "Board Name") - (cons (string :tag "Board Name") - (string :tag "API Path")))) + (repeat (choice :tag "Special API" + (string :tag "Board Name") + (cons (string :tag "Board Name") + (string :tag "API Path")))) (boolean :tag "Use TLS?")))) (defcustom sbbs-default-board nil "Jump to first link after narrowing posts." :type '(choice (const :tag "None" nil)