/* -*-c-*-
*
- * $Id: key-attr.c,v 1.2 2000/02/12 18:21:02 mdw Exp $
+ * $Id: key-attr.c,v 1.3 2001/06/22 19:39:43 mdw Exp $
*
* Key attribute manipulation
*
/*----- Revision history --------------------------------------------------*
*
* $Log: key-attr.c,v $
+ * Revision 1.3 2001/06/22 19:39:43 mdw
+ * Allow tagging if the tag is owned by a deleted key.
+ *
* Revision 1.2 2000/02/12 18:21:02 mdw
* Overhaul of key management (again).
*
if (tag) {
kr = sym_find(&f->bytag, tag, -1, sizeof(*kr), &found);
- if (found)
+ if (found && !KEY_EXPIRED(time(0), kr->k->del))
return (KERR_DUPTAG);
kr->k = k;
}