Fixed some errors.

.github/actions/build-docs/upload.ros

@@ -5,7 +5,9 @@ exec ros -Q -- $0 "$@"
 |#
 (progn ;;init forms
   (ros:ensure-asdf)
-  #+quicklisp(ql:quickload '() :silent t))
+  #+quicklisp
+  (ql:quickload '(log4cl)
+                :silent t))
 
 (defpackage :ros.script.upload
   (:use :cl))
@@ -69,7 +71,7 @@ behaviour could be overriden by keyword argument ``:raise t``."
                           "git "
                           commands)))
         
-      (log:info "Running" command "in" path)
+      (log:info "Running" command "in" *current-dir*)
       (run command))))