From: Christopher Allan Webber Date: Mon, 23 Jan 2017 19:20:02 +0000 (-0600) Subject: Restrict our scrubl structure to p, strong, emph for now X-Git-Tag: fosdem-2017~98 X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=commitdiff_plain;h=280e24352cd85bbb92b5b3e92aed2567fe2a6fc2 Restrict our scrubl structure to p, strong, emph for now --- diff --git a/mudsync/scrubl.scm b/mudsync/scrubl.scm index 1d82338..d25200f 100644 --- a/mudsync/scrubl.scm +++ b/mudsync/scrubl.scm @@ -16,7 +16,7 @@ ;;; You should have received a copy of the GNU General Public License ;;; along with Mudsync. If not, see . -;;; SCRUBL: S-exps Craftily/Crappily Representing the Underlying Basic Language +;;; SCRUBL: S-exps Craftily/Crappily Rendering Underlying Basic Language ;;; a micro-"skribe-like" system (kinda ugly tho) ;;; Turns quasiquoted structures into something rendered. ;;; @@ -126,7 +126,6 @@ Pass in optional extra ARGS to the main META-WRITE" (define scrubl-sxml (make-scrubl `((p . ,(scrubl-sxml-simple-field 'p)) - (bold . ,(scrubl-sxml-simple-field 'b)) - (it . ,(scrubl-sxml-simple-field 'it)) - (emph . ,(scrubl-sxml-simple-field 'it))) + (strong . ,(scrubl-sxml-simple-field 'strong)) ; usually bold + (emph . ,(scrubl-sxml-simple-field 'em))) ; usually italicized scrubl-sxml-write))