Fixing stuff

This commit is contained in:
Wouter van Oijen 2006-05-21 14:49:40 +00:00
parent 38c78e3c62
commit 684f08649d
27 changed files with 672 additions and 414 deletions

View file

@ -66,7 +66,6 @@ Pad the value to padLength characters by adding zeros in front if necesarry.
Flag that tells the User Profile system that this is a valid form element in a User Profile
=cut
sub definition {
@ -98,7 +97,8 @@ sub definition {
}
#-------------------------------------------------------------------
=head2 getInputElement
=head2 getInputElement ( )
Returns the form element used for manual input.
@ -116,7 +116,8 @@ sub getInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeInputElement
=head2 getOnChangeInputElement ( )
Returns the javascript code to update the slider and other form elements on a
change of the imput element.
@ -137,7 +138,8 @@ sub getOnChangeInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeSlider
=head2 getOnChangeSlider ( )
Returns the javascript code to update the form on a change of slider position.
@ -157,20 +159,22 @@ sub getOnChangeSlider {
}
#-------------------------------------------------------------------
=head2 getSliderMaximum
Returns the maximum value the slider can be set to in slider units.
=cut
sub getSliderMaximum {
my $self = shift;
return scalar(keys %{$self->get('options')}) - 1;
}
#=head2 getSliderMaximum ( )
#
#Returns the maximum value the slider can be set to in slider units.
#
#=cut
#
#sub getSliderMaximum {
# my $self = shift;
#
# return scalar(keys %{$self->get('options')}) - 1;
#}
#-------------------------------------------------------------------
=head2 getSliderMaximum
=head2 getSliderMaximum ( )
Returns the minimum value the slider can be set to in slider units.
@ -183,7 +187,8 @@ sub getSliderMaximum {
}
#-------------------------------------------------------------------
=head2 getSliderMaximum
=head2 getSliderMinimum ( )
Returns the minimum value the slider can be set to in slider units.
@ -196,7 +201,8 @@ sub getSliderMinimum {
}
#-------------------------------------------------------------------
=head2 getSliderValue
=head2 getSliderValue ( )
Returns the initial position of the slider in slider units.
@ -209,6 +215,7 @@ sub getSliderValue {
}
#-------------------------------------------------------------------
=head2 getValueFromPost ( )
Retrieves a value from a form GET or POST and returns it. If the value comes back as undef, this method will return the defaultValue instead. Strip newlines/carriage returns from the value.

View file

@ -76,7 +76,8 @@ sub definition {
}
#-------------------------------------------------------------------
=head2 getInputElement
=head2 getInputElement ( )
Returns the form element used for manual input.
@ -94,7 +95,8 @@ sub getInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeInputElement
=head2 getOnChangeInputElement ( )
Returns the javascript code to update the slider and other form elements on a
change of the imput element.
@ -109,7 +111,8 @@ sub getOnChangeInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeSlider
=head2 getOnChangeSlider ( )
Returns the javascript code to update the form on a change of slider position.

View file

@ -62,6 +62,7 @@ sub alignmentSeparator {
Parse a string for a list of options to present to the user. This method
will mainly be called from WebGUI::Form::DynamicField.
=cut
sub correctOptions {

View file

@ -59,7 +59,8 @@ sub definition {
}
#-------------------------------------------------------------------
=head2 getDisplayValue
=head2 getDisplayValue ( )
Returns the value that should be displayed initially.
@ -72,7 +73,8 @@ sub getDisplayValue {
}
#-------------------------------------------------------------------
=head2 getInputElement
=head2 getInputElement ( )
Returns the form element used for manual input.
@ -91,7 +93,8 @@ sub getInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeInputElement
=head2 getOnChangeInputElement ( )
Returns the javascript code to update the slider and other form elements on a
change of the imput element.
@ -107,7 +110,8 @@ sub getOnChangeInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeSlider
=head2 getOnChangeSlider ( )
Returns the javascript code to update the form on a change of slider position.
@ -122,7 +126,8 @@ sub getOnChangeSlider {
}
#-------------------------------------------------------------------
=head2 getSliderMaximum
=head2 getSliderMaximum ( )
Returns the maximum value the slider can be set to in slider units.
@ -135,7 +140,8 @@ sub getSliderMaximum {
}
#-------------------------------------------------------------------
=head2 getSliderMinimum
=head2 getSliderMinimum ( )
Returns the minimum value the slider can be set to in slider units.
@ -148,7 +154,8 @@ sub getSliderMinimum {
}
#-------------------------------------------------------------------
=head2 getSliderValue
=head2 getSliderValue ( )
Returns the initial position of the slider in slider units.
@ -190,6 +197,5 @@ sub getValueFromPost {
}
1;

View file

@ -92,7 +92,8 @@ sub definition {
}
#-------------------------------------------------------------------
=head2 getDisplayValue
=head2 getDisplayValue ( )
Returns the value that should be displayed initially.
@ -105,7 +106,8 @@ sub getDisplayValue {
}
#-------------------------------------------------------------------
=head2 getDisplayVariable
=head2 getDisplayVariable ( )
Returns the javascript variable for the td element used for display of the
slider value.
@ -122,7 +124,8 @@ sub getDisplayVariable {
}
#-------------------------------------------------------------------
=head2 getInputElement
=head2 getInputElement ( )
Returns the form element used for manual input. You must overload this method.
@ -135,7 +138,8 @@ sub getInputElement {
}
#-------------------------------------------------------------------
=head2 getInputVariable
=head2 getInputVariable ( )
Returns the javascript variable for the input element tied to the slider.
@ -151,7 +155,8 @@ sub getInputVariable {
}
#-------------------------------------------------------------------
=head2 getOnChangeInputElement
=head2 getOnChangeInputElement ( )
This method should return the javascript code that should be executed on an
onchange event of the input element. This should at the very least include
@ -171,7 +176,8 @@ sub getOnChangeInputElement {
}
#-------------------------------------------------------------------
=head2 getOnChangeSlider
=head2 getOnChangeSlider ( )
This method should return the javascript code that should be executed on an
onchange event of the slider. This should at the very least include
@ -191,7 +197,8 @@ sub getOnChangeSlider {
}
#-------------------------------------------------------------------
=head2 getSliderMaximum
=head2 getSliderMaximum ( )
Returns the maximum value the slider can be set to in slider units.
@ -204,7 +211,8 @@ sub getSliderMaximum {
}
#-------------------------------------------------------------------
=head2 getSliderMinimum
=head2 getSliderMinimum ( )
Returns the minimum value the slider can be set to in slider units.
@ -217,7 +225,8 @@ sub getSliderMinimum {
}
#-------------------------------------------------------------------
=head2 getSliderValue
=head2 getSliderValue ( )
Returns the initial position of the slider in slider units.
@ -230,7 +239,8 @@ sub getSliderValue {
}
#-------------------------------------------------------------------
=head2 getSliderVariable
=head2 getSliderVariable ( )
Returns the javascript variable for the slider.