Update of /project/lisppaste/cvsroot/lisppaste2 In directory common-lisp.net:/home/bmastenbrook/lisppaste2
Modified Files: web-server.lisp Log Message: More RSS!
Date: Tue Feb 3 18:47:27 2004 Author: bmastenbrook
Index: lisppaste2/web-server.lisp diff -u lisppaste2/web-server.lisp:1.20 lisppaste2/web-server.lisp:1.21 --- lisppaste2/web-server.lisp:1.20 Fri Jan 30 11:34:12 2004 +++ lisppaste2/web-server.lisp Tue Feb 3 18:47:26 2004 @@ -1,4 +1,4 @@ -;;;; $Id: web-server.lisp,v 1.20 2004/01/30 16:34:12 bmastenbrook Exp $ +;;;; $Id: web-server.lisp,v 1.21 2004/02/03 23:47:26 bmastenbrook Exp $ ;;;; $Source: /project/lisppaste/cvsroot/lisppaste2/web-server.lisp,v $
;;;; See the LICENSE file for licensing information. @@ -80,7 +80,8 @@ (araneida:html-stream (araneida:request-stream request) `(html - (head (title "All pastes")) + (head (title "All pastes") + ((link :rel "alternate" :type "application/rss+xml" :title "Lisppaste RSS" :href ,(araneida:urlstring *rss-url*)))) (body (center (h2 "All pastes in system")) ((table :width "100%" :cellpadding 2)