--- loncom/auth/localstudentphoto.pm 2006/02/10 02:38:59 1.4 +++ loncom/auth/localstudentphoto.pm 2008/11/10 13:20:24 1.5 @@ -1,6 +1,6 @@ # The LON-CAPA dummy student photo fetch mechnism # -# $Id: localstudentphoto.pm,v 1.4 2006/02/10 02:38:59 raeburn Exp $ +# $Id: localstudentphoto.pm,v 1.5 2008/11/10 13:20:24 jms Exp $ # # Copyright Michigan State University Board of Trustees # @@ -27,6 +27,8 @@ # 8/24 Guy Albertelli + + package localstudentphoto; use lib '/home/httpd/lib/perl/'; use LONCAPA::Configuration; @@ -80,20 +82,6 @@ sub thumbsettings { my $thumbsize = '40x40'; return ($fullsize,$thumbsize); } - -############################### -# sub AUTOLOAD -# -# Incoming data: none -# Returns '' -# -# Prevents errors when undefined subroutines are called in this package -# Will allow new routines added in the future to be called from lond etc. -# without the need for customized versions of local*.pm packages to be -# modified to include the new subroutines immediately. -# -# See "Programming Perl" 3rd ed. pp 296-298. -############################### sub AUTOLOAD { our $AUTOLOAD; @@ -102,3 +90,26 @@ sub AUTOLOAD { 1; __END__ + +=pod + +=head1 NAME + +AUTOLOAD + +=head1 SYNOPSIS + +Incoming data: none +Returns '' + +=head1 OVERVIEW + +Prevents errors when undefined subroutines are called in this package. +Will allow new routines added in the future to be called from lond etc. +without the need for customized versions of local*.pm packages to be +modified to include the new subroutines immediately. + +See I<"Programming Perl"> 3rd ed. pp 296-298. + +=cut +