-from Carbon import Qd
-from Carbon import Win
-from Carbon import QuickDraw
-from Carbon import Evt
+from Carbon import Evt, Qd, QuickDraw, Win
import string
from types import *
import sys
-WidgetsError = "WidgetsError"
+class WidgetsError(Exception): pass
DEBUG = 0
+
class Widget:
"""Base class for all widgets."""
import Wbase
import Wkeys
-from Carbon import Scrap
import string
-from Carbon import Evt
-from Carbon import Events
-from Carbon import Qd
-from Carbon import Win
-from Carbon import Lists
+from Carbon import Evt, Events, Lists, Qd, Scrap, Win
class List(Wbase.SelectableWidget):
import FrameWork
-from Carbon import Qd
import Wbase, Wcontrols
-from Carbon import Ctl, Controls
+from Carbon import Ctl, Controls, Qd
from types import *
import Wapplication
-from Carbon import Qd
-from Carbon import Win
-from Carbon import Evt
-from Carbon import Fm
+from Carbon import Dlg, Evt, Events, Fm
+from Carbon import Menu, Qd, Win, Windows
import FrameWork
-from Carbon import Windows
-from Carbon import Events
import Wbase
-from Carbon import Dlg
import MacOS
-from Carbon import Menu
import struct
import traceback
-
-from types import *
+from types import InstanceType, StringType
class Window(FrameWork.Window, Wbase.SelectableWidget):