15.4.1507  src/lib/x-kit/widget/old/leaf/button-shape-types.pkg

## button-shape-types.pkg

# Compiled by:
#     src/lib/x-kit/widget/xkit-widget.sublib

# This package gets referenced in:
#
#     src/lib/x-kit/widget/old/leaf/button-look-from-drawfn-and-sizefn-g.pkg
#     src/lib/x-kit/widget/old/leaf/button-drawfn-and-sizefn.api

stipulate
    package wg =  widget;                       # widget        is from   src/lib/x-kit/widget/old/basic/widget.pkg
    package xc =  xclient;                      # xclient       is from   src/lib/x-kit/xclient/xclient.pkg
    package g2d=  geometry2d;                   # geometry2d    is from   src/lib/std/2d/geometry2d.pkg
herein

    package button_shape_types
    {
        Drawfn =    (xc::Drawable, g2d::Size, Int)
                    ->          
                    (xc::Pen, xc::Pen, xc::Pen)
                    ->
                    Void
                    ;

        Sizefn =    (Int, Null_Or(Int))
                    ->
                    wg::Widget_Size_Preference
                    ;
    };

end;