diff options
author | Ori Bernstein <ori@eigenstate.org> | 2021-06-14 00:00:37 +0000 |
---|---|---|
committer | Ori Bernstein <ori@eigenstate.org> | 2021-06-14 00:00:37 +0000 |
commit | a73a964e51247ed169d322c725a3a18859f109a3 (patch) | |
tree | 3f752d117274d444bda44e85609aeac1acf313f3 /sys/lib/python/lib-tk/tkMessageBox.py | |
parent | e64efe273fcb921a61bf27d33b230c4e64fcd425 (diff) |
python, hg: tow outside the environment.
they've served us well, and can ride off into the sunset.
Diffstat (limited to 'sys/lib/python/lib-tk/tkMessageBox.py')
-rw-r--r-- | sys/lib/python/lib-tk/tkMessageBox.py | 122 |
1 files changed, 0 insertions, 122 deletions
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?") |