projects
/
cl-rss.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r10042: add umask to upload scripts
[cl-rss.git]
/
main.lisp
diff --git
a/main.lisp
b/main.lisp
index 61b3b508e6b740972a16f6b29380f319c7ebd165..fb93f7d4098e495730d70a613fbf72abbd1a47af 100644
(file)
--- a/
main.lisp
+++ b/
main.lisp
@@
-7,7
+7,7
@@
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Sep 2003
;;;;
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Sep 2003
;;;;
-;;;; $Id
: rss.asd 7061 2003-09-07 06:34:45Z kevin
$
+;;;; $Id$
;;;; *************************************************************************
(in-package #:rss)
;;;; *************************************************************************
(in-package #:rss)
@@
-26,7
+26,7
@@
'("http://www.cliki.net/recent-changes.rdf"))
(defun show-sites (&optional (sites *sites*))
'("http://www.cliki.net/recent-changes.rdf"))
(defun show-sites (&optional (sites *sites*))
- (dolist (site
sites
)
+ (dolist (site
(mklist sites)
)
(awhen (rss-site site)
(display-site it))))
(awhen (rss-site site)
(display-site it))))