4 function gender_selector($current="",$suffix="") {
6 $select = array('', t('Male'), t('Female'), t('Currently Male'), t('Currently Female'), t('Mostly Male'), t('Mostly Female'), t('Transgender'), t('Intersex'), t('Transsexual'), t('Hermaphrodite'), t('Neuter'), t('Non-specific'), t('Other'), t('Undecided'));
8 $o .= "<select name=\"gender$suffix\" id=\"gender-select$suffix\" size=\"1\" >";
9 foreach($select as $selection) {
10 $selected = (($selection == $current) ? ' selected="selected" ' : '');
11 $o .= "<option value=\"$selection\" $selected >$selection</option>";
17 function sexpref_selector($current="",$suffix="") {
19 $select = array('', t('Males'), t('Females'), t('Gay'), t('Lesbian'), t('No Preference'), t('Bisexual'), t('Autosexual'), t('Abstinent'), t('Virgin'), t('Deviant'), t('Fetish'), t('Oodles'), t('Nonsexual'));
21 $o .= "<select name=\"sexual$suffix\" id=\"sexual-select$suffix\" size=\"1\" >";
22 foreach($select as $selection) {
23 $selected = (($selection == $current) ? ' selected="selected" ' : '');
24 $o .= "<option value=\"$selection\" $selected >$selection</option>";
31 function marital_selector($current="",$suffix="") {
33 $select = array('', t('Single'), t('Lonely'), t('Available'), t('Unavailable'), t('Has crush'), t('Infatuated'), t('Dating'), t('Unfaithful'), t('Sex Addict'), t('Friends'), t('Friends/Benefits'), t('Casual'), t('Engaged'), t('Married'), t('Imaginarily married'), t('Partners'), t('Cohabiting'), t('Common law'), t('Happy'), t('Not looking'), t('Swinger'), t('Betrayed'), t('Separated'), t('Unstable'), t('Divorced'), t('Imaginarily divorced'), t('Widowed'), t('Uncertain'), t('It\'s complicated'), t('Don\'t care'), t('Ask me') );
35 $o .= "<select name=\"marital\" id=\"marital-select\" size=\"1\" >";
36 foreach($select as $selection) {
37 $selected = (($selection == $current) ? ' selected="selected" ' : '');
38 $o .= "<option value=\"$selection\" $selected >$selection</option>";