git.fiddlerwoaroof.com
package.lisp
16cdb16d
 ;;;; package.lisp
 
2806d56a
 (defpackage :alimenta.render
   (:use :cl )
   (:export #:render-feed #:render-item #:add-rendered-item))
 
93a579ec
 (defpackage #:data-class
   (:use #:cl #:should-test #:lquery #:plump #:alexandria #:anaphora)
   (:export #:define-data-class))
 
a4392760
 (defpackage #:alimenta2
90496875
   (:use #:cl #:alexandria #:serapeum #:should-test))
a4392760
 
16cdb16d
 (defpackage #:alimenta
a16882ba
   (:use #:cl #:should-test #:lquery #:plump #:alexandria #:anaphora #:collection-class)
311bcb8e
   (:export #:to-feed #:generate-xml #:feed #:title #:link #:items #:feed-link #:feed-type
58a15352
            #:doc #:source-type #:id #:date #:content #:item #:description
a3645f2a
            #:%generate-xml #:%to-feed #:get-items #:make-item #:complex-value
311bcb8e
            #:primary-value #:render #:author #:content-el #:feed-type-unsupported
fb34c0f3
            #:pop-token #:filter-feed #:feed-entity
            #:transform))
a16882ba
 
 (defpackage #:alimenta.html
90496875
   (:use #:cl)
a16882ba
   (:export #:html-renderer))
d5d31282
 
cd914c16
 (defpackage #:alimenta.rss
90496875
   (:use #:cl #:should-test #:lquery #:plump #:alexandria #:anaphora #:alimenta #:data-class)
58a15352
   (:export #:language #:copyright #:managing-editor #:webmaster
            #:publication-date #:last-build-date #:categories #:generator #:docs
            #:cloud #:ttl #:image #:rating #:text-input #:skip-hours #:skip-days
2815e4e1
            #:rss-feed #:rss-item #:category #:domain))
cd914c16
 
d5d31282
 (defpackage #:alimenta.atom
   (:use #:cl #:should-test #:lquery #:plump #:alexandria #:anaphora #:alimenta))
16cdb16d
 
 (defpackage #:alimenta.discover
   (:use #:cl #:alimenta #:alexandria #:anaphora #:lquery)
   (:export #:discover-feed))
 
5dc30073
 (defpackage #:alimenta.pull-feed
16cdb16d
   (:use #:cl #:alimenta #:alexandria #:anaphora #:lquery)
58a15352
   (:export #:pull-feed #:fetch-doc-from-url #:fetch-feed-from-url
311bcb8e
            #:fetch-error #:feed-ambiguous #:no-feed #:with-user-agent
2964849d
 	         #:skip-feed))
d5d31282
 
 (defpackage #:alimenta.test-runner
   (:use #:cl #:alimenta #:alimenta.atom #:alimenta.discover #:alimenta.pull-feed))
 
 (in-package :alimenta.test-runner)
 
 (defclass xunit-test (asdf:test-op) ())
 
 (defmethod asdf:perform ((o asdf:test-op) (s (eql (asdf:find-system :alimenta))))
   (asdf:load-system :alimenta)
   (or (st:test :package :alimenta)
       (st:test :package :alimenta.atom)
       (st:test :package :alimenta.discover)
       (st:test :package :alimenta.pull-feed)))