--- loncom/imspackages/imsprocessor.pm	2004/03/16 19:20:58	1.3
+++ loncom/imspackages/imsprocessor.pm	2004/03/16 23:35:33	1.4
@@ -249,6 +249,11 @@ sub process_manifest {
         text_h =>
             [sub {
                 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"],
         end_h =>
               [sub {