Common Lisp Package: TEEPEEDEE2.BLOG

README:

FUNCTION

Private

BLOG-ADMIN-PASSWORD-FILE (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-COMMENT-INDEX-PREFIX (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-DIR (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-ENTRIES (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-ENTRIES-TABLE (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-NAME (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-SITE (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

BLOG-STATIC-BASE-URL (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

UNLOGGED-COMMENT-AUTHOR (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

UNLOGGED-COMMENT-DATASTORE-ID (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

UNLOGGED-COMMENT-ENTRY-INDEX-NAME (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

UNLOGGED-COMMENT-TEXT (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

UNLOGGED-COMMENT-TIME (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

UNLOGGED-COMMENT-TRACE-DETAILS (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

Undocumented

BLOG-ADMIN-PASSWORD (BLOG)

SETFBLOG-ADMIN-PASSWORD-FILE (NEW-VALUE INSTANCE)

BLOG-ADMIN-URL (BLOG)

BLOG-ATOM-FEED (BLOG &KEY (COUNT 10) TAGS)

BLOG-ATOM-FEED-URL (BLOG)

SETFBLOG-COMMENT-INDEX-PREFIX (NEW-VALUE INSTANCE)

SETFBLOG-DIR (NEW-VALUE INSTANCE)

SETFBLOG-ENTRIES (NEW-VALUE INSTANCE)

SETFBLOG-ENTRIES-TABLE (NEW-VALUE INSTANCE)

BLOG-ENTRY-CHANNEL-ID (BLOG ENTRY-NAME)

BLOG-ENTRY-UNIQUE-STRING (BLOG ENTRY-NAME)

BLOG-FEED-HEAD-CONTENTS (BLOG)

BLOG-FRONT-PAGE (BLOG)

BLOG-LAST-UPDATED (BLOG)

BLOG-LATEST-PAGE (BLOG)

BLOG-LATEST-URL (BLOG)

SETFBLOG-NAME (NEW-VALUE INSTANCE)

BLOG-P (OBJECT)

BLOG-POST-COMMENT-URL (BLOG)

BLOG-READ-IN (BLOG)

BLOG-READY-ENTRIES (BLOG &KEY (AGE (GET-UNIVERSAL-TIME)) TAGS)

BLOG-READY-ENTRIES-HTTP (BLOG)

BLOG-RSS-FEED (BLOG &KEY (COUNT 10) TAGS)

BLOG-RSS-FEED-URL (BLOG)

BLOG-SET-PAGE (BLOG)

SETFBLOG-SITE (NEW-VALUE INSTANCE)

SETFBLOG-STATIC-BASE-URL (NEW-VALUE INSTANCE)

BLOG-URL (BLOG NAME)

COMMENT-AUTHOR (COMMENT)

SETFCOMMENT-AUTHOR (NEW-VALUE COMMENT)

COMMENT-DATASTORE-ID (COMMENT)

SETFCOMMENT-DATASTORE-ID (NEW-VALUE COMMENT)

COMMENT-ENTRY-INDEX-NAME (COMMENT)

SETFCOMMENT-ENTRY-INDEX-NAME (NEW-VALUE COMMENT)

COMMENT-P (OBJECT)

COMMENT-SCORE (COMMENT)

COMMENT-TEXT (COMMENT)

SETFCOMMENT-TEXT (NEW-VALUE COMMENT)

COMMENT-TIME (COMMENT)

SETFCOMMENT-TIME (NEW-VALUE COMMENT)

COMMENT-TRACE-DETAILS (COMMENT)

SETFCOMMENT-TRACE-DETAILS (NEW-VALUE COMMENT)

COPY-BLOG (INSTANCE)

COPY-COMMENT (INSTANCE)

ENTRY-CHANNEL (ENTRY)

ENTRY-CHANNEL-ID (ENTRY)

ENTRY-COMBINED-TITLE (ENTRY)

ENTRY-COMMENT-ML (ENTRY)

ENTRY-COMMENTS (ENTRY)

ENTRY-FILENAME (ENTRY)

ENTRY-FRONT-PAGE-P (ENTRY &OPTIONAL TAGS)

ENTRY-HEADLINE-ML (ENTRY SCORE-MUL)

ENTRY-HOT-OFF-THE-PRESS-P (ENTRY)

ENTRY-INDEX-NAME (ENTRY)

ENTRY-INLINE-ML (ENTRY)

ENTRY-LINK (ENTRY)

ENTRY-READ-PARAGRAPHS-FROM-BUFFER (ENTRY BUFFER)

ENTRY-SET-CHANNEL (ENTRY)

ENTRY-SET-PAGE (ENTRY)

ENTRY-SET-SCORE (ENTRY)

ENTRY-STORY-ML (ENTRY)

ENTRY-UPDATE-SCORE (ENTRY &OPTIONAL (INC 0))

ENTRY-URL-PATH (ENTRY)

FRIENDLY-AGE-STRING (TIME)

MAKE-BLOG (&KEY ((NAME DUM0) NIL) ((ADMIN-PASSWORD-FILE DUM1) NIL) ((DIR DUM2) NIL) ((ENTRIES DUM3) NIL) ((ENTRIES-TABLE DUM4) NIL) ((SITE DUM5) (CURRENT-SITE)) ((LINK-BASE DUM6) /) ((COMMENT-INDEX-PREFIX DUM7) NIL) ((STATIC-BASE-URL DUM8) NIL))

MAKE-COMMENT (&KEY (DATASTORE-ID (DATASTORE-ID-NEXT)) (ENTRY-INDEX-NAME NIL) (TEXT NIL) (AUTHOR NIL) (TIME (GET-UNIVERSAL-TIME)) (TRACE-DETAILS NIL))

MAKE-ENTRY (&REST ARGS)

MAKE-ENTRY-CHANNEL (&REST ARGS)

NORMALLY-CAPITALIZED-STRING-TO-SYMBOL (STRING &OPTIONAL (PACKAGE (SYMBOL-PACKAGE 'NORMALLY-CAPITALIZED-STRING-TO-SYMBOL)))

PARSE-TIME (STR)

READ-IN-ENTRY (BLOG NAME)

SCORE-DECAY (THEN &KEY (NOW (GET-UNIVERSAL-TIME)) (AGE (- NOW THEN)))

SLURP-FILE (FILENAME)

SPLIT-INTO-LIST-BY-COMMA (STR)

SPLIT-INTO-PARAGRAPHS (STR)

SPLIT-INTO-PARAGRAPHS-BY-SINGLE-LINE (STR)

TIME-STRING (&OPTIONAL (UT (GET-UNIVERSAL-TIME)))

SETFUNLOGGED-COMMENT-AUTHOR (NEW-VALUE INSTANCE)

SETFUNLOGGED-COMMENT-DATASTORE-ID (NEW-VALUE INSTANCE)

SETFUNLOGGED-COMMENT-ENTRY-INDEX-NAME (NEW-VALUE INSTANCE)

SETFUNLOGGED-COMMENT-TEXT (NEW-VALUE INSTANCE)

SETFUNLOGGED-COMMENT-TIME (NEW-VALUE INSTANCE)

SETFUNLOGGED-COMMENT-TRACE-DETAILS (NEW-VALUE INSTANCE)

UNLOGGED-MAKE-COMMENT (&KEY ((DATASTORE-ID DUM1) NIL) ((ENTRY-INDEX-NAME DUM2) NIL) ((TEXT DUM3) NIL) ((AUTHOR DUM4) NIL) ((TIME DUM5) NIL) ((TRACE-DETAILS DUM6) NIL))

MACRO

Private

Undocumented

DEFPAGE-LAMBDA-BLOG (PATH FUNCTION &REST ARGS)

GENERIC-FUNCTION

Private

Undocumented

ENTRY-CHANNEL-P (VAR)

ENTRY-P (VAR)

SLOT-ACCESSOR

Private

Undocumented

ENTRY-BLOG (OBJECT)

SETFENTRY-BLOG (NEW-VALUE OBJECT)

ENTRY-CHANNEL-ENTRY (OBJECT)

SETFENTRY-CHANNEL-ENTRY (NEW-VALUE OBJECT)

ENTRY-EXPIRY-TIME (OBJECT)

SETFENTRY-EXPIRY-TIME (NEW-VALUE OBJECT)

ENTRY-NAME (OBJECT)

SETFENTRY-NAME (NEW-VALUE OBJECT)

ENTRY-PARAGRAPHS (OBJECT)

SETFENTRY-PARAGRAPHS (NEW-VALUE OBJECT)

ENTRY-SCORE (OBJECT)

SETFENTRY-SCORE (NEW-VALUE OBJECT)

ENTRY-SCORE-UPDATE-TIME (OBJECT)

SETFENTRY-SCORE-UPDATE-TIME (NEW-VALUE OBJECT)

ENTRY-TAGS (OBJECT)

SETFENTRY-TAGS (NEW-VALUE OBJECT)

ENTRY-TIME (OBJECT)

SETFENTRY-TIME (NEW-VALUE OBJECT)

ENTRY-TITLE (OBJECT)

SETFENTRY-TITLE (NEW-VALUE OBJECT)

VARIABLE

Private

Undocumented

*AGE-UNITS*

*COMMENT-SCORE*

*ENTRY-FRESH-TIME*

*ENTRY-SCORE*

*SCORE-DECAY*

CLASS

Private

Undocumented

BLOG

COMMENT

ENTRY

ENTRY-CHANNEL (ENTRY)

CONSTANT

Private

Undocumented

+MAX-COMMENT-LENGTH+