- (dotimes (i (articles-count artset))
- (print-article (nth i (articles artset)) :os os :format format
- :complete complete :print-link print-link))
- artset)
+ (dotimes (i (articles-count artset) artset)
+ (if (nth i (articles artset))
+ (print-article (nth i (articles artset)) :os os :format format
+ :complete complete :print-link print-link)
+ (princ "NULL Article" os))))