Tcl Source Code

Artifact [b6004a242f]
Login

Artifact b6004a242fa6023d51804820bffb3ed538644156:

Attachment "scan.patch" to ticket [1367506fff] added by sbron 2005-11-27 20:25:09.
--- 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());
 	    }
 	}
     }