X-Git-Url: https://git.distorted.org.uk/~mdw/ca/blobdiff_plain/69ab55f79b5b6109be503ff8d61fba82b1468360..f480f87cfd3a6ac3315cf3302ebfc2b631de6456:/bin/withdraw diff --git a/bin/withdraw b/bin/withdraw index ed6e740..af47bc5 100755 --- a/bin/withdraw +++ b/bin/withdraw @@ -25,6 +25,11 @@ ## Find the common utilities. source [file join [file dirname $argv0] "../lib/func.tcl"] +## Open the database +sqlite3 db "$CERTROOT/state/ca.db" +db nullvalue nil +cd "$CERTROOT" + ## Get the list of requests. if {[llength $argv] != 1} { puts stderr "Usage: $QUIS REQID"