cl-yag/data/articles.lisp

40 lines
2.0 KiB
Common Lisp
Raw Normal View History

;; MIND: The tilde character "~" must be escaped like this '~~' to use it as a literal.
;; Define Your Webpage
2016-04-30 15:21:31 +00:00
(defvar *config*
(list
:webmaster "Your autor name here"
:title "Put youre website's title here."
:description "Yet another website on the net"
:url "https://my.website/~~user/" ;; the trailing slash is mandatory! RSS links will fail without it. Notice the '~~' to produce a literal '~'
:rss-item-number 10 ;; limit total amount of items in RSS feed to 10
:html t ;; 't' to enable export to a html website / 'nil' to disable
:gopher t ;; 't' to enable export to a gopher website / 'nil' to disable
:gopher-path "/user" ;; absolute path of your gopher directory
:gopher-server "my.website" ;; hostname of the gopher server
:gopher-port "70" ;; tcp port of the gopher server, 70 usually
2016-04-30 15:21:31 +00:00
))
;; Define your articles and their display-order on the website in *articles* below.
;; Display Order is 'lifo', i.e. the top entry in this list gets displayed as the topmost entry.
;;
;; An Example Of A Minimal Definition:
;; (list :id "4" :date "2015-05-04" :title "The article title" :author "Me" :tiny "Short description for home page")
;;
;; A Note On Keywords:
;; :author can be omitted. If so, it's value gets replaced by the value of :webmaster.
;; :tiny can be omitted. If so, the article's full text gets displayed on the all-articles view. (most people don't want this.)
2016-04-30 15:21:31 +00:00
(defvar *articles*
(list
(list :id "README" :date "20 May 2016" :tag "cl-yag" :title "README" :author "Solène" :short "cl-yag is documenting itself." :tiny "cl-yag's README")
(list :id "1" :date "29 April 2016":tag "pony code" :title "My first message" :short "This is my first message" :author "Solène" :tiny "Read more")
2016-04-30 15:21:31 +00:00
))