[system] / trunk / webwork / system / scripts / newpassword.pl Repository:
ViewVC logotype

Diff of /trunk/webwork/system/scripts/newpassword.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 69 Revision 70
5## newpassword.pl takes as arguments the course, loginname and newpassword 5## newpassword.pl takes as arguments the course, loginname and newpassword
6## e.g. newpassword.pl demoCourse dummy 000-00-0000 6## e.g. newpassword.pl demoCourse dummy 000-00-0000
7 7
8## NOTE: this should only be run by the professor 8## NOTE: this should only be run by the professor
9 9
10BEGIN {
11 my $useLibDir = '.';
12 if ($0 =~ m|^(/.*)/|) { $useLibDir = $1; }
13 elsif ($0 =~ m|^(\..*)/|) { $useLibDir = $1; }
14 elsif ($0 =~ m|^(.+)/|) { $useLibDir = "./$1"; }
15 unshift @INC, $useLibDir;
16}
17
10use lib '.'; use webworkInit; # WeBWorKInitLine 18use webworkInit; # WeBWorKInitLine
11use Global; 19use Global;
12use Auth; 20use Auth;
13 21
14$course = $ARGV[0]; 22$course = $ARGV[0];
15$login_name = $ARGV[1]; 23$login_name = $ARGV[1];

Legend:
Removed from v.69  
changed lines
  Added in v.70

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9