--- loncom/interface/lonnavmaps.pm	2002/10/04 20:34:04	1.66
+++ loncom/interface/lonnavmaps.pm	2002/10/07 19:00:38	1.67
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.66 2002/10/04 20:34:04 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.67 2002/10/07 19:00:38 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2037,6 +2037,7 @@ sub goesto { my $self=shift; return $sel
 # "to" can return a comma seperated list for branches
 sub to { my $self=shift; return $self->navHash("to_", 1); }
 sub kind { my $self=shift; return $self->navHash("kind_", 1); }
+sub ext { my $self=shift; return $self->navHash("ext_", 1) eq 'true:'; }
 sub src { 
     my $self=shift;
     return $self->navHash("src_", 1);
@@ -2286,6 +2287,8 @@ sub getFeedback {
 sub parts {
     my $self = shift;
 
+    if ($self->ext) { return ['0']; }
+
     $self->extractParts();
     return $self->{PARTS};
 }
@@ -2309,6 +2312,7 @@ sub extractParts {
     my $self = shift;
     
     return if ($self->{PARTS});
+    return if ($self->ext);
 
     $self->{PARTS} = [];