Overview
| Comment: | Fix type update from [d0b75dd168] |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
c6c6a90cab3f8183e9f1e95473f263d6 |
| User & Date: | zge on 2022-01-24 09:16:03 |
| Other Links: | branch diff | manifest | tags |
Context
|
2022-01-24
| ||
| 09:22 | Add sbbs-format-word-at-point user option check-in: 4d43170777 user: zge tags: master, trunk | |
| 09:16 | Fix type update from [d0b75dd168] check-in: c6c6a90cab user: zge tags: master, trunk | |
| 09:12 | Fix typo in sbbs--thread-loader's Scheme->Elisp translation check-in: c0938f9005 user: zge tags: master, trunk | |
Changes
Modified sbbs.el from [81d2e3071c] to [2fdcb74ccb].
39 39 :prefix "sbbs-") 40 40 41 41 (defcustom sbbs-boards 42 42 '(("textboard.org" ("sol" "prog") t) 43 43 ("bbs.jp.net" (("mona" . "")) t)) 44 44 "List of SchemeBBS sites and boards." 45 45 :type '(repeat (list (string :tag "Board Domain") 46 - (repeat (or (string :tag "Board Name") 47 - (cons (string :tag "Board Name") 48 - (string :tag "API Path")))) 46 + (repeat (choice :tag "Special API" 47 + (string :tag "Board Name") 48 + (cons (string :tag "Board Name") 49 + (string :tag "API Path")))) 49 50 (boolean :tag "Use TLS?")))) 50 51 51 52 (defcustom sbbs-default-board nil 52 53 "Jump to first link after narrowing posts." 53 54 :type '(choice (const :tag "None" nil) 54 55 (cons (string :tag "Board Domain") 55 56 (string :tag "Board Name"))))