version 1.6, 2003/10/21 15:28:13
|
version 1.7, 2003/10/21 15:58:26
|
Line 117 foreach my $metadata (@loncapa) {
|
Line 117 foreach my $metadata (@loncapa) {
|
my $version = $tkline[5]; |
my $version = $tkline[5]; |
my $notes = $tkline[6]; |
my $notes = $tkline[6]; |
my $abstract = $tkline[7]; |
my $abstract = $tkline[7]; |
next if ($abstract eq ''); |
unless ($abstract) { $abstract=$subject; } |
|
unless ($abstract) { $abstract=$title; } |
|
unless ($abstract) { $abstract=$keywords; } |
my $type = $tkline[8]; |
my $type = $tkline[8]; |
my $learning_resource_type; |
my $learning_resource_type; |
if ( $type eq 'problem' ) { |
if ( $type eq 'problem' ) { |