Return to imsprocessor.pm CVS log | Up to [LON-CAPA] / loncom / imspackages |
version 1.3, 2004/03/16 19:20:58 | version 1.4, 2004/03/16 23:35:33 |
---|---|
Line 249 sub process_manifest { | Line 249 sub process_manifest { |
text_h => | text_h => |
[sub { | [sub { |
my ($text) = @_; | my ($text) = @_; |
if ($state[0] eq "manifest" && $state[1] eq "organizations" && $state[2] eq "organization" && $state[-1] eq "title") { | |
if ($cms eq 'angel') { | |
$$items{$itm}{title} = $text; | |
} | |
} | |
}, "dtext"], | }, "dtext"], |
end_h => | end_h => |
[sub { | [sub { |