|
version 1.160.6.18, 2013/05/11 22:08:27
|
version 1.160.6.19, 2013/06/05 13:31:19
|
|
Line 5441 sub publishlogo {
|
Line 5441 sub publishlogo {
|
| my $source = $filepath.'/'.$file; |
my $source = $filepath.'/'.$file; |
| my $logfile; |
my $logfile; |
| if (!open($logfile,">>$source".'.log')) { |
if (!open($logfile,">>$source".'.log')) { |
| return (&mt('No write permission to Construction Space')); |
return (&mt('No write permission to Authoring Space')); |
| } |
} |
| print $logfile |
print $logfile |
| "\n================= Publish ".localtime()." ================\n". |
"\n================= Publish ".localtime()." ================\n". |
![[BACK]](/icons/back.gif){kind=icon}
Return to domainprefs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface