--- loncom/interface/lonpickcourse.pm 2010/09/23 21:50:37 1.100 +++ loncom/interface/lonpickcourse.pm 2013/02/05 16:38:00 1.104 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a course # -# $Id: lonpickcourse.pm,v 1.100 2010/09/23 21:50:37 www Exp $ +# $Id: lonpickcourse.pm,v 1.104 2013/02/05 16:38:00 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -364,9 +364,9 @@ sub display_matched_courses { } if ($numcourses > 1 && $multiple) { - $r->print('print(' -   

'); } @@ -439,10 +439,10 @@ sub display_matched_courses { } } } - push(@owners,&unescape($courses{$course}{'owner'})); - if (ref($courses{$course}{'co-owners'}) eq 'ARRAY') { - foreach my $item (@{$courses{$course}{'co-owners'}}) { - push(@owners,&unescape($item)); + push(@owners,$courses{$course}{'owner'}); + if ($courses{$course}{'co-owners'} ne '') { + foreach my $item (split(/,/,$courses{$course}{'co-owners'})) { + push(@owners,$item); } } } else { @@ -494,9 +494,9 @@ sub display_matched_courses { } if (!%courses) { - $r->print(&mt('None found')); + $r->print('

'.&mt('None found').'

'); } elsif ($multiple) { - $r->print(''); + $r->print(''); } $r->print(''. "\n".''."\n". @@ -1061,8 +1061,13 @@ ENDSCRIPT } else { my ($name_code,$type_code); if ($env{'form.cnameelement'} ne '') { - $name_code = 'opener.document.'.$env{'form.form'}.'.'. - $env{'form.cnameelement'}.'.value=cdesc;'; + $name_code = < 25) { + showcdesc = cdesc.substr(0,25)+' ...'; +} +opener.document.$env{'form.form'}.$env{'form.cnameelement'}.value=showcdesc; +ENDNAMECODE } if ($env{'form.typeelement'} ne '') { $type_code = 'opener.document.'.$env{'form.form'}.'.'. @@ -1289,7 +1294,7 @@ javascript functions used when user sele =item -(g) Scantron Operator uploading a scantron file to a course - course number is written to visible form element in opener window. Child window closes. +(g) Bubblesheet Scanning Operator uploading a bubblesheet file to a course - course number is written to visible form element in opener window. Child window closes. =item