diff --git a/library/ui/dialogs.factor b/library/ui/dialogs.factor deleted file mode 100644 index efc24cf5cc..0000000000 --- a/library/ui/dialogs.factor +++ /dev/null @@ -1,54 +0,0 @@ -IN: gadgets -USING: generic kernel namespaces threads ; - -TUPLE: dialog continuation ; - -: dialog-action ( dialog ? -- ) - over close-tile swap dialog-continuation call ; - -: dialog-ok ( dialog -- ) t dialog-action ; - -: dialog-cancel ( dialog -- ) f dialog-action ; - -: ( -- gadget ) - - "OK" [ dialog-ok ]