Update of /project/elephant/cvsroot/elephant/src/db-bdb In directory clnet:/tmp/cvs-serv23282/src/db-bdb
Modified Files: bdb-controller.lisp Log Message: User parameter if; deadlock detector param support
--- /project/elephant/cvsroot/elephant/src/db-bdb/bdb-controller.lisp 2007/02/14 04:36:10 1.23 +++ /project/elephant/cvsroot/elephant/src/db-bdb/bdb-controller.lisp 2007/02/14 17:41:29 1.24 @@ -236,8 +236,7 @@ (launch-background-program (second (controller-spec ctrl)) (namestring - (make-pathname :directory '(:ABSOLUTE "opt" "local" "bin" "db45_deadlock") - :name "db_deadlock")) + (make-pathname :defaults (get-user-configuration-parameter :berkeley-db-deadlock))) :args `("-a" ,(lookup-deadlock-type type) "-t" ,(format nil "~D" time) ,@(when log (list "-L" (format nil "~A" log)))))