sbbs.el: Diff

Differences From Artifact [cec0dbd9ca]:

File sbbs.el — part of check-in [9ba0256b5c] at 2020-02-26 22:17:08 on branch master — removed risky flag from sbbs-boards (user: philip@warpmail.net, size: 15713) [annotate] [blame] [check-ins using]

To Artifact [5ad14f783c]:

File sbbs.el — part of check-in [50b5a3c4bd] at 2020-02-26 22:22:49 on branch master — stopped filling paragraphs after manual line break (user: philip@warpmail.net, size: 15685) [annotate] [blame] [check-ins using]

   164    164   
   165    165   (defun sbbs--insert-sxml-par (sxml)
   166    166     "Insert paragraph contents SXML at point."
   167    167     (dolist (it sxml)
   168    168       (cond ((stringp it)
   169    169              (insert (propertize it 'face 'variable-pitch)))
   170    170             ((eq (car it) 'br)
   171         -           (fill-paragraph)
   172    171              (newline))
   173    172             ((eq (car it) 'b)
   174    173              (insert (propertize (cadr it) 'face '(bold variable-pitch))))
   175    174             ((eq (car it) 'i)
   176    175              (insert (propertize (cadr it) 'face '(italic variable-pitch))))
   177    176             ((eq (car it) 'code)
   178    177              (insert (propertize (cadr it) 'face 'fixed-pitch)))