From 8431733c0744cbed410139b9b5d625aa29a38917 Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Fri, 26 Jul 1996 16:04:29 +0000
Subject: [PATCH] Allow only one selection (this tests settability of selFlags)

---
 Mac/Lib/test/tlist.py | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Mac/Lib/test/tlist.py b/Mac/Lib/test/tlist.py
index 4dba121236..fdcfe6e1c9 100644
--- 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()
-- 
2.50.1