=pod
=head1 NAME
FLTK::Adjuster - FLTK::Valuator subclass
=head1 Description
L<Valuator|FLTK::Valuator> widget that displays three buttons. The user pushes
down the button and drags left/right to adjust, or clicks the button to step,
or shift-clicks to step backwards. One button moves in the
L<C<step()>|FLTK::Valuator/"step"> values, the next in
C<10 * >L<C<step()>|FLTK::Valuator/"step">, and the third in
C<100 * >L<C<step()>|FLTK::Valuator/"step">. Holding down shift makes the
buttons move in the opposite way.
B<Note: This is a depreciated widget. Please see
L<FLTK::Notes|FLTK::Notes/"NotesDepPol">.>
=head1 Functions
=head2 C<default_style>
X<default_style>
=over
=item C<my $style = $adjuster-E<gt>default_style( );>X<my_style_adjuster_E_gt_default_style_>
Returns the current L<style|FLTK::NamedStyle>.
=head3 C<$adjuster-E<gt>default_style( $new_style )>
=for hackers xs/Adjuster.xs line 71
=item C<$adjuster-E<gt>default_style( $style );>X<_adjuster_E_gt_default_style_style_>
Sets the current L<style|FLTK::NamedStyle>.
=head2 soft
=head3 C<$adjuster-E<gt>soft( $x )>
=for hackers xs/Adjuster.xs line 77
=back
=head2 C<new>
X<new>
=over
=item C<my $self = $adjuster-E<gt>new( $x, $y, $w, $h, $label );>X<my_self_adjuster_E_gt_new_x_y_w_h_label_>
Creates a new C<FLTK::Adjuster> object. This constructor expects integers for
C<$x, $y, $w, $h> and accepts an optional string for C<$label>.
Usage:
=for markdown {%highlight perl%}
my $adjustor_1 = FLTK::Adjuster->new( $x, $y, $w, $h, $label );
my $adjustor_2 = FLTK::Adjuster->new( 40, 40, 150, 40);
=for markdown {%endhighlight%}
=for hackers xs/Adjuster.xs line 40
=back
=head2 C<soft>
X<soft>
=over
=item C<$adjuster-E<gt>soft( $x );>X<_adjuster_E_gt_soft_x_>
TODO
=head3 C<my $x = $adjuster-E<gt>soft( )>
=for hackers xs/Adjuster.xs line 98
=item C<my $x = $adjuster-E<gt>soft( );>X<my_x_adjuster_E_gt_soft_>
TODO
=pod
=for hackers xs/Adjuster.xs line 104
=back
=head1 C<Constructor>
=head1 Methods
=head2 default_style
=head3 C<$style = $adjuster-E<gt>default_style( )>
=head1 Author
Sanko Robinson <sanko@cpan.org> - http://sankorobinson.com/
=head1 License and Legal
Copyright (C) 2008-2010 by Sanko Robinson <sanko@cpan.org>
This program is free software; you can redistribute it and/or modify it under
the terms of
L<The Artistic License 2.0|http://www.perlfoundation.org/artistic_license_2_0>.
See the F<LICENSE> file included with this distribution or
L<notes on the Artistic License 2.0|http://www.perlfoundation.org/artistic_2_0_notes>
for clarification.
When separated from the distribution, all original POD documentation is
covered by the
L<Creative Commons Attribution-Share Alike 3.0 License|http://creativecommons.org/licenses/by-sa/3.0/us/legalcode>.
See the
L<clarification of the CCA-SA3.0|http://creativecommons.org/licenses/by-sa/3.0/us/>.
=for git $Id: Adjuster.xs 7483df2 2011-04-09 05:42:22Z sanko@cpan.org $
=cut