core: lisp/lib/organ/element/lesser/paragraph.lisp annotate

changelog shortlog graph tags branches changeset files file revisions raw help

Mercurial > core / annotate lisp/lib/organ/element/lesser/paragraph.lisp

changeset 698:	96958d3eb5b0
parent:	d20482540d67
author:	Richard Westhaver <ellis@rwest.io>
date:	Fri, 04 Oct 2024 22:04:59 -0400
permissions:	-rw-r--r--
description:	fixes

127 960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	1	;;; lib/organ/element/paragraph.lisp --- Org Paragraph
960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	2
960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	3	;;
960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	4
960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	5	;;; Code:
960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	6	(in-package :organ)
960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	7
132 d20482540d67 fixin ellis <ellis@rwest.io> parents: 130 diff changeset	8	(define-org-element paragraph
d20482540d67 fixin ellis <ellis@rwest.io> parents: 130 diff changeset	9	((contents :initarg :contents :type vector :accessor org-contents))
d20482540d67 fixin ellis <ellis@rwest.io> parents: 130 diff changeset	10	:lesser t)
127 960c010a23ce replaced lalr parser with YACC, removed vcard and ical data formats (requires xpath), added org elements and objects ellis <ellis@rwest.io> parents: diff changeset	11
128 99f2ab6bc8ba organ work ellis <ellis@rwest.io> parents: 127 diff changeset	12	(define-org-parser (paragraph :from string)
132 d20482540d67 fixin ellis <ellis@rwest.io> parents: 130 diff changeset	13	(let ((res (org-create :paragraph)))
d20482540d67 fixin ellis <ellis@rwest.io> parents: 130 diff changeset	14	(setf (org-contents res) input)
d20482540d67 fixin ellis <ellis@rwest.io> parents: 130 diff changeset	15	res))