Return window ID of form (later should use attr list liek objects).

gvanrossum · gvanrossum · commit 4f5eafb0cf0d · 1991-09-13T15:32:37.000Z
diff --git a/Modules/flmodule.c b/Modules/flmodule.c
@@ -1636,6 +1636,8 @@ form_getattr(f, name)
 	formobject *f;
 	char *name;
 {
+	if (strcmp(name, "window") == 0)
+		return newintobject(f->ob_form->window);
 	/* XXX check for data attr's: x, y etc. */
 	return findmethod(form_methods, (object *)f, name);
 }

Original file line number	Diff line number	Diff line change
`@@ -1636,6 +1636,8 @@ form_getattr(f, name)`
`1636`	`1636`	`formobject *f;`
`1637`	`1637`	`char *name;`
`1638`	`1638`	`{`
	`1639`	`+ if (strcmp(name, "window") == 0)`
	`1640`	`+ return newintobject(f->ob_form->window);`
`1639`	`1641`	`/* XXX check for data attr's: x, y etc. */`
`1640`	`1642`	`return findmethod(form_methods, (object *)f, name);`
`1641`	`1643`	`}`