diff --git a/src/fccfg.c b/src/fccfg.c
index 421b47c..b61848a 100644
--- a/src/fccfg.c
+++ b/src/fccfg.c
@@ -1832,11 +1832,13 @@ FcConfigSubstituteWithPat (FcConfig    *config,
 			if (value[object])
 			{
 			    FcConfigDel (&elt[object]->values, value[object]);
+			    FcValueListDestroy (l);
 			    break;
 			}
 			/* fall through ... */
 		    case FcOpDeleteAll:
 			FcConfigPatternDel (p, r->u.edit->object);
+			FcValueListDestroy (l);
 			break;
 		    default:
 			FcValueListDestroy (l);