sbbs.el

Check-in [50b5a3c4bd]
Login
Overview
Comment:stopped filling paragraphs after manual line break
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | master | trunk
Files: files | file ages | folders
SHA3-256: 50b5a3c4bd60c8aa722afb4ed79923deb894ab161b5f23dff43f34fff7f90465
User & Date: philip@warpmail.net on 2020-02-26 22:22:49
Other Links: branch diff | manifest | tags
Context
2020-02-26
22:23
fixed revert buffer bug in thread buffers check-in: 25999f9e22 user: philip@warpmail.net tags: master, trunk
22:22
stopped filling paragraphs after manual line break check-in: 50b5a3c4bd user: philip@warpmail.net tags: master, trunk
22:17
removed risky flag from sbbs-boards check-in: 9ba0256b5c user: philip@warpmail.net tags: master, trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified sbbs.el from [cec0dbd9ca] to [5ad14f783c].

   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)))