1 files changed, 30 insertions, 0 deletions
diff --git a/contrib/dialog/samples/radiolist4 b/contrib/dialog/samples/radiolist4
new file mode 100755
index 0000000..67d920f
--- /dev/null
+++ b/contrib/dialog/samples/radiolist4
@@ -0,0 +1,30 @@
+#! /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