From a73a964e51247ed169d322c725a3a18859f109a3 Mon Sep 17 00:00:00 2001 From: Ori Bernstein Date: Mon, 14 Jun 2021 00:00:37 +0000 Subject: python, hg: tow outside the environment. they've served us well, and can ride off into the sunset. --- sys/lib/python/lib-tk/tkMessageBox.py | 122 ---------------------------------- 1 file changed, 122 deletions(-) delete mode 100644 sys/lib/python/lib-tk/tkMessageBox.py (limited to 'sys/lib/python/lib-tk/tkMessageBox.py') diff --git a/sys/lib/python/lib-tk/tkMessageBox.py b/sys/lib/python/lib-tk/tkMessageBox.py deleted file mode 100644 index aff069bfa..000000000 --- a/sys/lib/python/lib-tk/tkMessageBox.py +++ /dev/null @@ -1,122 +0,0 @@ -# tk common message boxes -# -# this module provides an interface to the native message boxes -# available in Tk 4.2 and newer. -# -# written by Fredrik Lundh, May 1997 -# - -# -# options (all have default values): -# -# - default: which button to make default (one of the reply codes) -# -# - icon: which icon to display (see below) -# -# - message: the message to display -# -# - parent: which window to place the dialog on top of -# -# - title: dialog title -# -# - type: dialog type; that is, which buttons to display (see below) -# - -from tkCommonDialog import Dialog - -# -# constants - -# icons -ERROR = "error" -INFO = "info" -QUESTION = "question" -WARNING = "warning" - -# types -ABORTRETRYIGNORE = "abortretryignore" -OK = "ok" -OKCANCEL = "okcancel" -RETRYCANCEL = "retrycancel" -YESNO = "yesno" -YESNOCANCEL = "yesnocancel" - -# replies -ABORT = "abort" -RETRY = "retry" -IGNORE = "ignore" -OK = "ok" -CANCEL = "cancel" -YES = "yes" -NO = "no" - - -# -# message dialog class - -class Message(Dialog): - "A message box" - - command = "tk_messageBox" - - -# -# convenience stuff - -# Rename _icon and _type options to allow overriding them in options -def _show(title=None, message=None, _icon=None, _type=None, **options): - if _icon and "icon" not in options: options["icon"] = _icon - if _type and "type" not in options: options["type"] = _type - if title: options["title"] = title - if message: options["message"] = message - res = Message(**options).show() - # In some Tcl installations, Tcl converts yes/no into a boolean - if isinstance(res, bool): - if res: return YES - return NO - return res - -def showinfo(title=None, message=None, **options): - "Show an info message" - return _show(title, message, INFO, OK, **options) - -def showwarning(title=None, message=None, **options): - "Show a warning message" - return _show(title, message, WARNING, OK, **options) - -def showerror(title=None, message=None, **options): - "Show an error message" - return _show(title, message, ERROR, OK, **options) - -def askquestion(title=None, message=None, **options): - "Ask a question" - return _show(title, message, QUESTION, YESNO, **options) - -def askokcancel(title=None, message=None, **options): - "Ask if operation should proceed; return true if the answer is ok" - s = _show(title, message, QUESTION, OKCANCEL, **options) - return s == OK - -def askyesno(title=None, message=None, **options): - "Ask a question; return true if the answer is yes" - s = _show(title, message, QUESTION, YESNO, **options) - return s == YES - -def askretrycancel(title=None, message=None, **options): - "Ask if operation should be retried; return true if the answer is yes" - s = _show(title, message, WARNING, RETRYCANCEL, **options) - return s == RETRY - - -# -------------------------------------------------------------------- -# test stuff - -if __name__ == "__main__": - - print "info", showinfo("Spam", "Egg Information") - print "warning", showwarning("Spam", "Egg Warning") - print "error", showerror("Spam", "Egg Alert") - print "question", askquestion("Spam", "Question?") - print "proceed", askokcancel("Spam", "Proceed?") - print "yes/no", askyesno("Spam", "Got it?") - print "try again", askretrycancel("Spam", "Try again?") -- cgit v1.2.3