projects
/
lml.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r10300: Automated commit for Debian build of lml2 upstream-version-1.5.2
[lml.git]
/
2
/
downloads.lisp
diff --git
a/2/downloads.lisp
b/2/downloads.lisp
index 36af36d49fe929bde551b40974232524ff2a6758..855505b0a948a85c69dab5825836388052e7c6b7 100644
(file)
--- a/
2/downloads.lisp
+++ b/
2/downloads.lisp
@@
-60,7
+60,8
@@
(lml-princ "<h1>Download</h1>")
(lml-princ "<div class=\"mainbody\">")
(lml-format "<h3>Browse ~A Download Site</h3>" name)
(lml-princ "<h1>Download</h1>")
(lml-princ "<div class=\"mainbody\">")
(lml-format "<h3>Browse ~A Download Site</h3>" name)
- (lml-format "<a style=\"padding-left:20pt;\" href=\"~A\">~A</a>" url url))
+ (let ((*print-circle* nil))
+ (lml-format "<a style=\"padding-left:20pt;\" href=\"~A\">~A</a>" url url)))
(defun display-footer (dl-data)
(when (dl-data-signed dl-data)
(defun display-footer (dl-data)
(when (dl-data-signed dl-data)