Common Lisp Package: WEBLOCKS-S11

README:

FUNCTION

Public

DATAEDIT-EDITOR-INITARGS (DATAEDIT &OPTIONAL (ITEM NIL ITEM?))

Answer initargs appropriate for passing to a `data-editor' to talk back to DATAEDIT when appropriate. If ITEM, this is a form for an existing instance.

MACRO

Public

Undocumented

DEFINE-DEFAULT-PERSIST-CHILD-ORDER (CHILD-SPECIALIZER PARENT-SPECIALIZER EXPR)

GENERIC-FUNCTION

Public

ADD-CHILD-TO-PERSIST (CHILD SELF &OPTIONAL ORDER)

Arrange for CHILD to be sent `persist-child' when persisting SELF. ORDER may be of (member :before :after t nil), determining when CHILD will be persisted relative to SELF. NIL means use `default-persist-child-order'. T means do it both times, on the off chance this means something.

DEFAULT-PERSIST-CHILD-ORDER (CHILD PARENT)

Answer the time to persist CHILD relative to PARENT when no explicit order is given to `add-child-to-persist'. I intentionally fail to provide a default, because there isn't a good one. Use `define-default-persist-child-order' to make one yourself.

PERSIST-CHILD (STORE CHILD PARENT ORDER)

Persist CHILD as a consequence of PARENT. The default is to call `persist-object'.

PERSIST-CHILDREN (STORE SELF ORDER)

Access and persist `persistent-children' of SELF, then remove them from the list. This is always done by calling `persist-child'. ORDER indicates which should be taken.

PERSISTENT-CHILDREN (SELF)

Answer a list of objects to persist when persisting SELF, via `persist-child'. It will be cleared after such persistence.

CLASS

Public

PERSISTENT-CHILDREN-MIXIN

Provide the `persistent-children' accessor and backing.

US-CENTS-INPUT-PRESENTATION

The counterpart to `us-cents-presentation' for forms.

US-CENTS-PARSER

Parse a US dollar amount and answer the # of US cents.

US-CENTS-PRESENTATION

Present a count of US cents as a pretty US dollar amount.

Private

US-CENTS-PRINTER

Mixin for data and form; see `us-cents-presentation' and `us-cents-input-presentation'.