Differences From Artifact [7857cd54ea]:
- File sbbs.el — part of check-in [3b3f5a4071] at 2020-12-16 12:13:51 on branch master — Don't break compatibility with emacs -nw (user: zge, size: 26759) [annotate] [blame] [check-ins using]
To Artifact [d9b39dbe32]:
- File sbbs.el — part of check-in [aabf564004] at 2021-01-19 10:39:03 on branch master — Ensure valid board names are entered (user: zge, size: 26757) [annotate] [blame] [check-ins using]
161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 |
boards))
(let ((choice (completing-read
(if def
(format "Board (default %s/%s): "
(sbbs--board-domain def)
(sbbs--board-name def))
"Board: ")
boards nil nil "/" nil def)))
(if (stringp choice)
(cdr (assoc choice boards))
choice))))
;; UTILITY FUNCTIONS
(defun sbbs--reload-thread (&optional _ignore-auto _noconfirm)
|
| |
161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 |
boards))
(let ((choice (completing-read
(if def
(format "Board (default %s/%s): "
(sbbs--board-domain def)
(sbbs--board-name def))
"Board: ")
boards nil t "/" nil def)))
(if (stringp choice)
(cdr (assoc choice boards))
choice))))
;; UTILITY FUNCTIONS
(defun sbbs--reload-thread (&optional _ignore-auto _noconfirm)
|