From 0c412c059463c9fc1cdc56813d7bc8d8f0ea68c9 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Sat, 8 Feb 2003 19:52:50 +0000 Subject: add possibility to display images in tree-lists and bool-lists --- perl-install/interactive.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl-install/interactive.pm') diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index c32553a88..df28cc27b 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -42,14 +42,15 @@ use common; #- (type defaults to button if clicked or clicked_may_quit is there) #- (val need not be a reference) (if clicked_may_quit return true, it's as if "Ok" was pressed) #- label => (val need not be a reference) (type defaults to label if val is not a reference) -#- bool (with text) +#- bool (with "text" or "image" (which overrides text) giving an image filename) #- range (with min, max) #- combo (with list, not_edit, format) #- list (with list, icon2f (aka icon), separator (aka tree), format (aka pre_format function), #- help can be a hash or a function, #- tree_expanded boolean telling wether the tree should be wide open by default #- quit_if_double_click boolean -#- allow_empty_list disables the special cases for 0 and 1 element lists) +#- allow_empty_list disables the special cases for 0 and 1 element lists +#- image2f is a subroutine which takes a value of the list as parameter, and returns an array (text, image_file_name)) #- entry (the default) (with hidden) # #- heritate from this class and you'll get all made interactivity for same steps. -- cgit v1.2.1