--- loncom/homework/inputtags.pm 2003/01/19 08:16:43 1.79 +++ loncom/homework/inputtags.pm 2003/01/24 19:49:48 1.80 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.79 2003/01/19 08:16:43 albertel Exp $ +# $Id: inputtags.pm,v 1.80 2003/01/24 19:49:48 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -242,6 +242,9 @@ sub finalizeawards { foreach $award (@_) { if ($award eq 'MISORDERED_RANK') {$result=$award; last;} } } if ($result eq '' ) { + foreach $award (@_) { if ($award eq 'INVALID_FILETYPE') {$result=$award; last;} } + } + if ($result eq '' ) { foreach $award (@_) { if ($award eq 'DRAFT') {$result=$award; last;} } } if ($result eq '' ) { @@ -299,6 +302,9 @@ sub decideoutput { $message = 'You have provided an invalid ranking, look '. 'here for more information.'; $button=1; + } elsif ($award eq 'INVALID_FILETYPE') { + $message = 'The filetype extension of the file you uploaded is not allowed.'; + $button=1; } elsif ($award eq 'SIG_FAIL') { $message = "Please adjust significant figures.";# you provided %s significant figures"; $button=1;