Allow only one selection (this tests settability of selFlags)

diff --git a/Mac/Lib/test/tlist.py b/Mac/Lib/test/tlist.py
index 4dba121236e9f8831ffef9fb1673b1e3f76006d6..fdcfe6e1c9c1892584aab2b6068a5c9a86e8f66b 100644 (file)
--- a/Mac/Lib/test/tlist.py
+++ b/Mac/Lib/test/tlist.py
@@ -11,6 +11,7 @@ from FrameWork import *
 import Win
 import Qd
 import List
+import Lists
 import os
 
 class ListWindow(Window):
@@ -22,6 +23,7 @@ class ListWindow(Window):
                Qd.SetPort(w)
                self.wid = w
                self.list = List.LNew(r2, (0, 0, 1, 1), (0,0), 0, w, 0, 1, 1, 1)
+               self.list.selFlags = Lists.lOnlyOne
                self.filllist()
                w.DrawGrowIcon()
                self.do_postopen()