--- tclScan.c.orig	2005-11-27 14:22:18.000000000 +0100
+++ tclScan.c	2005-11-27 14:22:34.000000000 +0100
@@ -1188,12 +1188,6 @@
 	    if (objs[i] != NULL) {
 		Tcl_ListObjAppendElement(NULL, objPtr, objs[i]);
 		Tcl_DecrRefCount(objs[i]);
-	    } else {
-		/*
-		 * More %-specifiers than matching chars, so we
-		 * just spit out empty strings for these
-		 */
-		Tcl_ListObjAppendElement(NULL, objPtr, Tcl_NewObj());
 	    }
 	}
     }
