Commit ffc52c68 authored by Antoine Martin's avatar Antoine Martin
Browse files

Fix refresh typo

parent c1fa5a88
......@@ -63,11 +63,11 @@
(defparameter *makeinfo-path* "/usr/local/bin/makeinfo")
(defun refresh (&key (makeinfo-path *makeinfo-path*) (log-errors t) uninstall)
((let ((*makeinfo-path* makeinfo-path))
(when uninstall
(uninstall-releases))
(ql:update-all-dists :prompt nil)
(ql:update-client :prompt nil)
(build-releases)
(build-texis makeinfo-path :log-errors log-errors)
(build-index))))
(let ((*makeinfo-path* makeinfo-path))
(when uninstall
(uninstall-releases))
(ql:update-all-dists :prompt nil)
(ql:update-client :prompt nil)
(build-releases)
(build-texis makeinfo-path :log-errors log-errors)
(build-index)))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment