X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/ca/blobdiff_plain/0f9d9bad47d069fb05f3f1d937c42125a14c95ea..e6781005493d24150cde168caec3461467339d76:/bin/withdraw diff --git a/bin/withdraw b/bin/withdraw index ed6e740..4f67086 100755 --- a/bin/withdraw +++ b/bin/withdraw @@ -25,9 +25,14 @@ ## 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" + puts stderr "usage: $QUIS REQID" exit 1 } lassign $argv reqid