sbbs.el: Check-in [92c5d47565]

Overview

Comment:	Add sbbs-open-externally command
Downloads:	Tarball \| ZIP archive \| SQL archive
Timelines:	family \| ancestors \| descendants \| both \| master \| trunk
Files:	files \| file ages \| folders
SHA3-256:	92c5d475658a1a21fc200b5d6f13df40d2cc2f475c2b68dc83ef9905dbb519c8
User & Date:	philip on 2022-01-22 18:12:35
Other Links:	branch diff \| manifest \| tags

Context

2022-01-22
18:27		Add support for VIP-posting check-in: 46949449f3 user: zge tags: master, trunk
18:12		Add sbbs-open-externally command check-in: 92c5d47565 user: philip tags: master, trunk
2021-05-29
14:28		Fix outlines check-in: 80dcfa319c user: zge tags: master, trunk

Changes

Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified sbbs.el from [deeb5b67a8] to [187923b54c].

   508    508             (if sbbs-open-at-last-post
   509    509                 (sbbs-goto-end)
   510    510               (goto-char (point-min))))))))
   511    511   
   512    512   
   513    513   ;;; INTERACTIVE FUNCTIONS
   514    514   
          515  +(defun sbbs-open-externally ()
          516  +  "Open the current thread using `browse-url'."
          517  +  (interactive)
          518  +  (unless sbbs--thread-id
          519  +    (user-error "No thread to open"))
          520  +  (browse-url (sbbs--board-url sbbs--thread-id)))
          521  +
   515    522   (defun sbbs-show-all ()
   516    523     "Show all hidden posts."
   517    524     (interactive)
   518    525     (sbbs-show-pop -1))
   519    526   
   520    527   (defun sbbs-show-pop (&optional n)
   521    528     "Show all hidden posts.