4c8945a06b
dialog is distributed from GPLv2 to LGPLv2 and introduces a number of new features and a new and better libdialog API. The existing libdialog will be kept temporarily as libodialog for compatibility purposes until sade, sysinstall and tzsetup have been either updated or replaced. __FreeBSD_version is now 900030. Discussed on: -current Approved by: core Obtained from: http://invisible-island.net/dialog
31 lines
1.3 KiB
Bash
Executable File
31 lines
1.3 KiB
Bash
Executable File
#! /bin/sh
|
|
# $Id: radiolist4,v 1.9 2010/01/13 10:20:03 tom Exp $
|
|
|
|
. ./setup-vars
|
|
|
|
. ./setup-tempfile
|
|
|
|
$DIALOG --help-button --help-label "Hints" --item-help --ok-label Okay \
|
|
--cancel-label 'Give Up' \
|
|
--backtitle "No Such Organization" \
|
|
--title "RADIOLIST BOX" --clear "$@" \
|
|
--radiolist "Hi, this is a radiolist box. You can use this to \n\
|
|
present a list of choices which can be turned on or \n\
|
|
off. If there are more items than can fit on the \n\
|
|
screen, the list will be scrolled. You can use the \n\
|
|
UP/DOWN arrow keys, the first letter of the choice as a \n\
|
|
hot key, or the number keys 1-9 to choose an option. \n\
|
|
Press SPACE to toggle an option on/off. \n\n\
|
|
Which of the following are fruits?" 20 61 5 \
|
|
"Apple" "It's an apple." off "Hint: this grows in a tree" \
|
|
"Dog" "No, that's not my dog." ON "Hint: this likes trees" \
|
|
"Orange" "Yeah, that's juicy." off "Hint: this is green when picked" \
|
|
"Chicken" "Normally not a pet." off "Hint: not often in trees" \
|
|
"Cat" "No, never put a dog and a cat together!" off "Hint: may be found in trees" \
|
|
"Fish" "Cats like fish." off "Hint: usually not close to cats" \
|
|
"Lemon" "You know how it tastes." off "Hint: like an orange" 2> $tempfile
|
|
|
|
retval=$?
|
|
|
|
. ./report-tempfile
|