sbbs.el

Diff
Login

Differences From Artifact [35b5b19ba4]:

To Artifact [f9185109d4]:


598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
        (let ((beg (region-beginning))
              (end (region-end)))
          (goto-char end)
          (insert style)
          (goto-char beg)
          (insert style))
      (insert style style)))
  (when (or (not (mark)) (< (point) (mark)))
    (forward-char (length style))))

(defun sbbs-compose-format-code ()
  "Insert code syntax markers."
  (interactive)
  (sbbs-compose-format "```\n"))








|







598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
        (let ((beg (region-beginning))
              (end (region-end)))
          (goto-char end)
          (insert style)
          (goto-char beg)
          (insert style))
      (insert style style)))
  (when (or (not (region-active-p)) (< (point) (mark)))
    (forward-char (length style))))

(defun sbbs-compose-format-code ()
  "Insert code syntax markers."
  (interactive)
  (sbbs-compose-format "```\n"))