- key_fulltag(k->p, &t);
- if ((k->p->k->e & KF_ENCMASK) != KENC_STRUCT)
- die(EXIT_FAILURE, "parameter key `%s' is not structured", t.buf);
- while (*pp) {
- key_data *kd = key_structfind(k->p->k, *pp);
- if (!kd) {
- die(EXIT_FAILURE,
- "bad parameter key `%s': parameter `%s' not found", t.buf, *pp);
- }
- if (!KEY_MATCH(kd, &kf)) {
- die(EXIT_FAILURE,
- "bad parameter key `%s': subkey `%s' is not shared", t.buf, *pp);
+ if (pp) {
+
+ /* --- Run through the checklist --- */
+
+ key_fulltag(k->p, &t);
+ if ((k->p->k->e & KF_ENCMASK) != KENC_STRUCT)
+ die(EXIT_FAILURE, "parameter key `%s' is not structured", t.buf);
+ while (*pp) {
+ key_data *kd = key_structfind(k->p->k, *pp);
+ if (!kd) {
+ die(EXIT_FAILURE,
+ "bad parameter key `%s': parameter `%s' not found", t.buf, *pp);
+ }
+ if (!KEY_MATCH(kd, &kf)) {
+ die(EXIT_FAILURE,
+ "bad parameter key `%s': subkey `%s' is not shared", t.buf, *pp);
+ }
+ pp++;