[no subject]

[Ludovic Courtès]

branch: master
commit d8ac891e0d781536a781e80f56c29231b62e5c1b
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri Jun 2 10:00:17 2023 +0200

    base: Remove extra 'log-error' call.
    
    Typo introduced in 93d51df182756fe3bbb82b149e230a06eceafedb.
    
    * src/cuirass/base.scm (process-specs): Remove extra 'log-error' call.
---
 src/cuirass/base.scm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm
index 4af84c0..d2bacc4 100644
--- a/src/cuirass/base.scm
+++ b/src/cuirass/base.scm
@@ -695,9 +695,8 @@ specification."
                                           (cons 'system-error
                                                 (exception-args exception))))))
                             (kind
-                             (log-error
-                              (log-error "uncaught '~a' exception: ~s"
-                                         kind (exception-args exception)))))
+                             (log-error "uncaught '~a' exception: ~s"
+                                        kind (exception-args exception))))
                           (log-error "uncaught exception: ~s" exception))
                       (return #f))
                   (lambda ()