Skip to content

Commit

Permalink
document readonly items
Browse files Browse the repository at this point in the history
  • Loading branch information
dk committed Nov 15, 2024
1 parent 37df8cb commit 4eae92a
Showing 1 changed file with 12 additions and 2 deletions.
14 changes: 12 additions & 2 deletions Prima/DetailedList.pm
Original file line number Diff line number Diff line change
Expand Up @@ -60,7 +60,8 @@ sub init
$self-> {header} = bless {
maxWidth => 0,
}, q\Prima::DetailList::DummyHeader\;
$self-> {$_} = 0 for qw( mainColumn multiColumn vertical);
$self-> {$_} = 0 for qw(mainColumn multiColumn );
$self-> {$_} = 1 for qw(vertical);
%profile = $self-> SUPER::init( %profile);

my $hh = $self-> {headerInitHeight};
Expand Down Expand Up @@ -104,6 +105,8 @@ sub setup_indents
$_[0]-> {indents}-> [ 3] += $_[0]-> {headerInitHeight};
}

sub multiColumn {($#_)?($_[1]?$_[0]-> raise_ro('multiColumn'):0):$_[0]-> {multiColumn}}
sub vertical {($#_)?($_[1]?0:$_[0]-> raise_ro('vertical')):$_[0]-> {vertical}}

sub set_v_scroll
{
Expand Down Expand Up @@ -565,7 +568,6 @@ If 1, vertical grid lines between columns are drawn with C<gridColor>.
Default value: 0
=item headerClass
Assigns the header class.
Expand Down Expand Up @@ -604,6 +606,14 @@ corresponding column.
Default value: 0
=item multiColumn 0
Read-only property inherited from List
=item vertical 0
Read-only property inherited from List
=back
=head2 Methods
Expand Down

0 comments on commit 4eae92a

Please sign in to comment.