X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/catacomb-python/blobdiff_plain/f72dbe4cf57bcf84dd85b685f514b37bff3c8001..b048ac9d6e0caa90f7e892f4f2c96c9003c47932:/key.c

diff --git a/key.c b/key.c
index 7820f1d..c4ccfa9 100644
--- a/key.c
+++ b/key.c
@@ -1385,14 +1385,14 @@ static PyObject *key_pynew(PyTypeObject *ty, PyObject *arg, PyObject *kw)
   PyObject *kfobj;
   uint32 id;
   char *type;
-  long exptime = KEXP_FOREVER;
+  unsigned long exptime = KEXP_FOREVER;
   static char *kwlist[] = { "keyfile", "id", "type", "exptime", 0 };
   key *k;
   int err;
 
-  if (!PyArg_ParseTupleAndKeywords(arg, kw, "O!O&sl:new", kwlist,
+  if (!PyArg_ParseTupleAndKeywords(arg, kw, "O!O&s|O&:new", kwlist,
 				   keyfile_pytype, &kfobj, convu32, &id,
-				   &type, &exptime))
+				   &type, convulong, &exptime))
     goto end;
   if ((err = key_new(KEYFILE_KF(kfobj), id, type, exptime, &k)) != 0)
     KEYERR(err);