(add-to-list 'website-pages '("About" "about.html" about-fun "about.el")) (defun html-emacswiki (name) (html-a :href (concat "http://www.emacswiki.org/cgi-bin/wiki/" name) name)) (defun about-fun () (append (html-h2 "About this website") (html-p "This website was made with the help of " (html-emacswiki "HtmlLite") "." "This is a very simple emacs package that makes an html page out of " "a list of s-expressions. This means that I can generate the page with " "an elisp program. It's very cool. See the bottom of each page " "for a link to the source of the program that was used to generate it. The " "publishing machinery is in " (html-a :href "my-website.el.html" "this file.")) (html-p "The View source links are made with the " (html-a :href "http://fly.srk.fer.hr/~hniksic/emacs/htmlize.el" "htmlize-file") "function.") (html-p "The random image at the top of the links column is courtesy of " (html-a :href "http://www.mbam.qc.ca/en/index.html" "Musee des beaux-arts de Montreal")) (html-p "The stylesheet is a modified version of " (html-a :href "http://repose.cx" "Damien Elmes'"))))