Changes In Branch ben-hotfixes Excluding Merge-Ins
This is equivalent to a diff from 268b829751 to 93422a4832
|
2024-02-29
| ||
| 20:07 | Fix detection of references in 'sbbs-show-replies' The 'sbbs-ref' property was not stored in the overlay, but as a text-property inside the buffer. For that reason, it would always find no references, even if there were references in the same thread. check-in: 830ca8047f user: zge tags: master, trunk | |
|
2023-09-09
| ||
| 10:02 | add the "ornamentum" hash to allow posting out of the box (should be in a variable instead) Leaf check-in: 93422a4832 user: anon tags: ben-hotfixes | |
| 09:54 | make vip prefix argument in sbbs-compose-create work in /mona/ check-in: c19493c97a user: anon tags: ben-hotfixes | |
| 09:17 | fix VIP/sage function check-in: d9a94adf9b user: anon tags: ben-hotfixes | |
| 09:13 | fix the VIP/sage function check-in: 268b829751 user: anon tags: master, trunk | |
|
2022-01-24
| ||
| 09:35 | Replace formatting when using a prefix argument check-in: 1db3d1b5c3 user: zge tags: master, trunk | |
Modified sbbs.el from [bf2e481917] to [8483c098a2].
705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 |
(let ((board sbbs--board)
(url-request-method "POST")
(url-request-extra-headers
'(("Content-Type" . "application/x-www-form-urlencoded")))
(url-request-data
(url-build-query-string
`((epistula ,(buffer-string))
(ornamentum "") (name "") (message "")
(frontpage ,(if sbbs--thread-id "true" "false"))
,(if vip `(vip "on") nil)
. ,(and (not sbbs--thread-id)
`((titulus ,(read-string "Headline: ")))))))
(url (if sbbs--thread-id
(sbbs--board-url (format "%d/post" sbbs--thread-id))
(sbbs--board-url "/post"))))
(url-retrieve url (lambda (status buf)
(if (plist-get status :error)
|
| > |
705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 |
(let ((board sbbs--board)
(url-request-method "POST")
(url-request-extra-headers
'(("Content-Type" . "application/x-www-form-urlencoded")))
(url-request-data
(url-build-query-string
`((epistula ,(buffer-string))
(ornamentum "3b3738ae1c9295d272cec84ecf7af5c8") (name "") (message "")
(frontpage ,(if sbbs--thread-id "true" "false"))
,(if vip `(vip "on") nil)
(inscriptio ,(if vip "sage" ""))
. ,(and (not sbbs--thread-id)
`((titulus ,(read-string "Headline: ")))))))
(url (if sbbs--thread-id
(sbbs--board-url (format "%d/post" sbbs--thread-id))
(sbbs--board-url "/post"))))
(url-retrieve url (lambda (status buf)
(if (plist-get status :error)
|