Overview
Comment: | Add a "/" as initial content when prompting to open a board |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
43bf3542e75391e5699bc7cff4769160 |
User & Date: | zge on 2020-10-07 17:19:49 |
Other Links: | branch diff | manifest | tags |
Context
2020-12-16
| ||
12:13 | Don't break compatibility with emacs -nw check-in: 3b3f5a4071 user: zge tags: master, trunk | |
2020-10-07
| ||
17:19 | Add a "/" as initial content when prompting to open a board check-in: 43bf3542e7 user: zge tags: master, trunk | |
17:09 | Add separate face for post headers check-in: aa9e221e24 user: zge tags: master, trunk | |
Changes
Modified sbbs.el from [e87c43e082] to [53a852f77e].
︙ | ︙ | |||
161 162 163 164 165 166 167 | boards)) (let ((choice (completing-read (if def (format "Board (default %s/%s): " (sbbs--board-domain def) (sbbs--board-name def)) "Board: ") | | | 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) |
︙ | ︙ |