Hi, Mike.

You wrote:
>  The problem seems to be that HTML just wants a "Checked" word.

That's right. Radio button tags have to have:
        checked="checked"
to conform to XHTML and XML. HTML radio button tags just need:
        checked
And most browsers will accept either and usually do the right thing.

Here's what I came up with help fix the problem:
Rebol []
English: false
French: true
Ook: false
write File: %Checked.html ML compose/deep [
 html [
  head [
   title "Checked"
   ]
  body [
   h1 "Checked"
   form [
    (either English [[input/checked/type/name/value
"checked"]][[input/type/name/value]])
     radio language english "English"
    (either French [[input/checked/type/name/value
"checked"]][[input/type/name/value]])
     radio language french "Francais"
    (either Ook [[input/checked/type/name/value
"checked"]][[input/type/name/value]])
     radio language french "Ook!"
    ]
   ]
  ]
 ]
browse File

Of course, that's a little long and error prone to keep writing all the
time. So, after a bit of thought:


English: true
French: false
Ook: false
Multilingual: true

Check: func [Checked? [logic!] Dialect [path!]] [
 either Checked? [
  reduce [head insert next copy :Dialect 'checked "checked"]
  ] [
  :Dialect
  ]
 ]
write File: %Checked.html ML compose/deep [
 html [
  head [
   title "Checked"
   ]
  body [
   h1 "Checked"
   form [
    (Check English 'input/type/name/value) radio language english "English"
    (Check French 'input/type/name/value) radio language french "Francais"
    (Check Ook 'input/type/name/value) radio language french "Ook!"
    (Check Multilingual 'input/type/name/value) checkbox multilingual
multilingual "Multilingual?"
    ]
   ]
  ]
 ]
browse File

Note that the last option is a checkbox, not a radio button.

I hope that helps!

Andrew J Martin
Speaking in tongues and performing miracles.
ICQ: 26227169
http://www.rebol.it/Valley/
http://valley.orcon.net.nz/
http://Valley.150m.com/
-><-

-- 
To unsubscribe from this list, just send an email to
[EMAIL PROTECTED] with unsubscribe as the subject.

Reply via email to