From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Fri, 5 Dec 2003 19:00:00 +0000 (+0000)
Subject: r8307: accept atoms as well as lists
X-Git-Tag: debian-0.1.1-4~5
X-Git-Url: http://git.kpe.io/?p=cl-rss.git;a=commitdiff_plain;h=0764df3a59150bfe9852a82c879221684c1114f2;ds=sidebyside

r8307: accept atoms as well as lists
---

diff --git a/main.lisp b/main.lisp
index 61b3b50..f469ee7 100644
--- a/main.lisp
+++ b/main.lisp
@@ -26,7 +26,7 @@
     '("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))))