summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--ravanan/command-line-tool.scm4
-rw-r--r--ravanan/store.scm4
2 files changed, 4 insertions, 4 deletions
diff --git a/ravanan/command-line-tool.scm b/ravanan/command-line-tool.scm
index 310d179..f5edfc1 100644
--- a/ravanan/command-line-tool.scm
+++ b/ravanan/command-line-tool.scm
@@ -321,8 +321,8 @@ the built script as a monadic value."
         ;; been run successfully.
         (state-return
          (begin
-           (log-info "~a previously run; retrieving result from store"
-                     script)
+           (log-debug "~a previously run; retrieving result from store"
+                      script)
            (single-machine-job-state script inputs #t)))
         ;; Run script if it has not already been run.
         (begin
diff --git a/ravanan/store.scm b/ravanan/store.scm
index 6de7d21..5b9f8b8 100644
--- a/ravanan/store.scm
+++ b/ravanan/store.scm
@@ -147,8 +147,8 @@ interned path and location."
                                        (basename path))
                       store)))
                 (if (file-exists? interned-path)
-                    (log-info "~a previously interned into store as ~a~%"
-                              path interned-path)
+                    (log-debug "~a previously interned into store as ~a~%"
+                               path interned-path)
                     (begin
                       (log-info "Interning ~a into store as ~a~%"
                                 path interned-path)