capa/capa51/Discuss/Ver1.3/capadiscuss - diff

Return to capadiscuss CVS log

Up to [LON-CAPA] / capa / capa51 / Discuss / Ver1.3

version 1.3, 1999/10/14 18:47:01	version 1.4, 1999/10/18 20:58:33
Line 349 sub ViewProblem {	Line 349 sub ViewProblem {
}	}

sub ViewInfoFile {	sub ViewInfoFile {
	&Log("InfoFile");
open(INFOFILE,"$capadir/$class/discussion/$file");	open(INFOFILE,"$capadir/$class/discussion/$file");
@file = <INFOFILE>;	@file = <INFOFILE>;
closedir(INFOFILE);	closedir(INFOFILE);
Line 847 sub Log {	Line 848 sub Log {

&Lock("lock.file");	&Lock("lock.file");
open(LOG,">>$capadir/$class/discussion/logs/access.log");	open(LOG,">>$capadir/$class/discussion/logs/access.log");
print LOG "$snum\|$capaid\|$username\|$email\|$logmsg\|$setid\|$probnum\|$HyphenDate\|$Time\n";	print LOG "$snum\|$capaid\|$username\|$email\|$logmsg\|$setid\|$probnum\|$HyphenDate\|$Time\|$file\n";
close(LOG);	close(LOG);
&Unlock("lock.file");	&Unlock("lock.file");
}	}