sbbs.el: Diff

Differences From Artifact [a69b270c46]:

File sbbs.el — part of check-in [9cf3c77a3c] at 2020-05-05 19:49:13 on branch master — added formatting functions for compose-mode (user: philip@warpmail.net, size: 24186) [annotate] [blame] [check-ins using]

To Artifact [8f395ca288]:

File sbbs.el — part of check-in [093b218ae8] at 2020-05-05 19:49:38 on branch master — use variable-pitch face for links (user: philip@warpmail.net, size: 24245) [annotate] [blame] [check-ins using]

   257    257                                 (sbbs-view-open id range)))
   258    258                              ;; other thread
   259    259                              ((/= id sbbs--thread-id)
   260    260                               (let ((sbbs--board board))
   261    261                                 (sbbs-view-open id range)))
   262    262                              ;; this thread
   263    263                              (range (sbbs--limit-to-range range))))))
   264         -        (insert-button text 'action func 'sbbs-ref range)))))
          264  +        (insert-button (propertize text  'face 'variable-pitch)
          265  +                       'action func 'sbbs-ref range)))))
   265    266   
   266    267   (defun sbbs--insert-sxml-par (sxml)
   267    268     "Insert paragraph contents SXML at point."
   268    269     (dolist (it sxml)
   269    270       (cond ((stringp it)
   270    271              (insert (propertize it 'face 'variable-pitch)))
   271    272             ((eq (car it) 'br)