[BACK]Return to edit.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/edit.pm between versions 1.32 and 1.35

version 1.32, 2002/03/22 20:05:19 version 1.35, 2002/07/17 18:06:18
Line 165  sub get_insert_list { Line 165  sub get_insert_list {
     }      }
   }    }
   if (@tagnums) {    if (@tagnums) {
       my %options;
     foreach my $tagnum (@tagnums) {      foreach my $tagnum (@tagnums) {
       $result.='<option value="'.$tagnum.'">'.$Apache::lonxml::insertlist{"$tagnum.description"}."</option>\n";        my $descrip=$Apache::lonxml::insertlist{"$tagnum.description"};
         $options{$descrip} ="<option value=\"$tagnum\">".$descrip."</option>\n";
     }      }
       foreach my $option (sort(keys(%options))) { $result.=$options{$option}; }
     if ($result) { $result='<option selected="on"></option>'.$result; }      if ($result) { $result='<option selected="on"></option>'.$result; }
   }    }
   return $result;    return $result;
Line 423  sub select_or_text_arg { Line 426  sub select_or_text_arg {
     }      }
   }    }
   $optionlist.="<option value=\"TYPEDINVALUE\">Type in value</option>\n";    $optionlist.="<option value=\"TYPEDINVALUE\">Type in value</option>\n";
   if ($found) {    if (($found) || (!$selected)) {
     $result.=$description.'<select name="'."$Apache::lonxml::curdepth.$name".'">      $result.=$description.'<select name="'."$Apache::lonxml::curdepth.$name".'">
        '.$optionlist.'         '.$optionlist.'
       </select>';        </select>';
Line 567  search($elementname) : provide a link wh Line 570  search($elementname) : provide a link wh
 searcher (lonsearchcat) and, once a file is selected, place the result in  searcher (lonsearchcat) and, once a file is selected, place the result in
 the form element $elementname.  the form element $elementname.
   
 = item *  =item *
 editline(tag,data,description,size): Provide a <input type="text" ../> for  editline(tag,data,description,size): Provide a <input type="text" ../> for
 single-line text entry.  This is to be used for text enclosed by tags, not  single-line text entry.  This is to be used for text enclosed by tags, not
 arguements/parameters associated with a tag.  arguements/parameters associated with a tag.
Removed from v.1.32  
changed lines
  Added in v.1.35

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>