--- loncom/lonnet/perl/lonnet.pm 2006/08/31 12:27:18 1.776 +++ loncom/lonnet/perl/lonnet.pm 2006/08/31 12:30:23 1.777 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.776 2006/08/31 12:27:18 albertel Exp $ +# $Id: lonnet.pm,v 1.777 2006/08/31 12:30:23 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4231,7 +4231,7 @@ sub auto_instcode_format { } } -sub autovalidateclass_sec { +sub auto_validate_class_sec { my ($cdom,$cnum,$owner,$inst_class) = @_; my $homeserver = &homeserver($cnum,$cdom); my $response=&reply('autovalidateclass_sec:'.$inst_class.':'.