X-Git-Url: https://git.distorted.org.uk/~mdw/ca/blobdiff_plain/a0eb4b7ff6c91bc31b185345e9057a85c7efcb12..1f46e0424b4431efa6b2521d82dc8ed371bb10d2:/bin/add

diff --git a/bin/add b/bin/add
index bf144ae..cb4ecf0 100755
--- a/bin/add
+++ b/bin/add
@@ -1,4 +1,4 @@
-#! /usr/bin/tclsh8.5
+#! /usr/bin/tclsh
 ### -*-tcl-*-
 ###
 ### Insert a certificate request into the database.
@@ -70,7 +70,7 @@ db transaction {
 
     ## Check whether the profile exists.
     if {![db exists {
-      SELECT 1 FROM profile WHERE label = $profile;
+      SELECT 1 FROM profile WHERE label = $profile AND tombstone = 0;
     }]} {
       error "unknown profile `$profile'"
     }