--- loncom/interface/lonhelper.pm 2015/08/28 22:44:59 1.197 +++ loncom/interface/lonhelper.pm 2018/09/03 16:23:25 1.197.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # .helper XML handler to implement the LON-CAPA helper # -# $Id: lonhelper.pm,v 1.197 2015/08/28 22:44:59 raeburn Exp $ +# $Id: lonhelper.pm,v 1.197.2.1 2018/09/03 16:23:25 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1800,7 +1800,7 @@ sub render { if (lc($time) eq 'anytime') { $anytime=1; $date = &get_date_object(time); - $date->min(0); + $date->set_minute(0); } elsif (defined($time) && $time ne 0) { $date = &get_date_object($time); } else { @@ -1810,7 +1810,7 @@ sub render { if (!defined($date)) { $date = &get_date_object(time); - $date->min(0); + $date->set_minute(0); } if ($anytime) { @@ -2047,7 +2047,9 @@ be filtered out. The 'addstatus' attribu and long status display columns to the display. The 'addparts' attribute will add in a part selector beside problems that have more than 1 part. The 'includecourse' attribute if true, will include -the toplevel default.sequence in the results. +the toplevel default.sequence in the results. The 'modalLink' attribute, +if true, will cause links to be launched as modal pop-ups, instead of +replacing the resource selection listing, currently being displayed. =head3 SUB-TAGS @@ -2159,6 +2161,7 @@ sub start_resource { $paramHash->{'toponly'} = $token->[2]{'toponly'}; $paramHash->{'addstatus'} = $token->[2]{'addstatus'}; $paramHash->{'addparts'} = $token->[2]{'addparts'}; + $paramHash->{'modalLink'} = $token->[2]{'modallink'}; if ($paramHash->{'addparts'}) { $helper->declareVar($paramHash->{'variable'}.'_part'); } @@ -2365,6 +2368,7 @@ BUTTONS my $option_texts = $self->{OPTION_TEXTS}; my $option_types = $self->{OPTION_TYPES}; my $addparts = $self->{'addparts'}; + my $modalLink = $self->{'modalLink'}; my $headings_done = 0; # Evaluate the map url as needed @@ -2464,7 +2468,7 @@ BUTTONS $resource_name . "'/> "; } else { $col .= - " "; } @@ -2549,7 +2553,8 @@ RADIO 'suppressEmptySequences' => $self->{'suppressEmptySequences'}, 'include_top_level_map' => $self->{'include_top_level_map'}, 'iterator_map' => $mapUrl, - 'map_no_edit_link' => 1, } + 'map_no_edit_link' => 1, + 'modalLink' => $modalLink, } ); $result .= $buttons;